09.12.2011, 23:20 | #1 (permalink) |
Новичок
Регистрация: 09.12.2011
Сообщений: 7
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Нужна помощь, Pascal
нужен шаблон для сложения вычитания умножения и деления переменных друг на друга..в трубо паскале (если возможно с выводом результата в текстовый файл) готов заплатить за помощь(200-300wmr.) контакты,skype: palfords1 |
09.12.2011, 23:20 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
На форуме много схожих тем, можете полистать Нужна помощь Нужна помощь Требуется помощь в написании программы на языке Turbo Pascal Pascal, две задачки, нужна помощь Помощь по Pascal Помощь в Pascal. |
09.12.2011, 23:37 | #2 (permalink) |
support
Регистрация: 19.08.2007
Адрес: Зея
Сообщений: 15,794
Записей в дневнике: 71
Сказал(а) спасибо: 166
Поблагодарили 203 раз(а) в 86 сообщениях
Репутация: 75760
|
Что, дело совсем труба?
Для целых чисел a и b Код:
var a,b,s,w,od,cd:integer; p:longint; d:real; f:text; begin assign(f,'out.txt'); rewrite(f); readln(a,b); s:=a+b; m:=a-b; p:=a*b; d:=a/b; od:=a mod b; cd:=a div b; writeln(f,'a+b=',s,' a-b=',m,' a*b=',p,' a/b=',d:4:2); writeln(f,'остаток от деления a на b =',od); writeln(f,'целая часть от деления a на b=',cd); close(f); readln end. |
10.12.2011, 00:04 | #3 (permalink) | |
Новичок
Регистрация: 09.12.2011
Сообщений: 7
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Цитата:
|
|
10.12.2011, 00:08 | #4 (permalink) |
support
Регистрация: 19.08.2007
Адрес: Зея
Сообщений: 15,794
Записей в дневнике: 71
Сказал(а) спасибо: 166
Поблагодарили 203 раз(а) в 86 сообщениях
Репутация: 75760
|
Техзадание было такое: с выводом результатов в файл, не вполне понятно, что вам еще нужно. В вышеприведенном листинге реализованы все доступные операции из перечисленных в техзадании. Поясните, что вам непонятно?
|
10.12.2011, 00:15 | #5 (permalink) |
Новичок
Регистрация: 09.12.2011
Сообщений: 7
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
можете привести пример не как шаблон а как рабочую программу для выполнения 1го из этих действий?
|
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
10.12.2011, 00:22 | #6 (permalink) |
support
Регистрация: 19.08.2007
Адрес: Зея
Сообщений: 15,794
Записей в дневнике: 71
Сказал(а) спасибо: 166
Поблагодарили 203 раз(а) в 86 сообщениях
Репутация: 75760
|
Возьмите листинг, удалите лишние переменные и строки с операциями, оставьте только одну арифметическую операцию и будет вам счастье/
Вот листинг для операции сложения, исходные данные вводятся с клавиатуры. При необходимости самостоятельно добавьте чтение данных из файла, это нетрудно . Код:
var a,b,s:integer; f:text; begin assign(f,'out.txt'); rewrite(f); readln(a,b); s:=a+b; writeln(f,'a+b=',s); close(f); readln end. |
10.12.2011, 00:44 | #7 (permalink) | |
Новичок
Регистрация: 09.12.2011
Сообщений: 7
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Цитата:
|
|
10.12.2011, 07:44 | #8 (permalink) |
support
Регистрация: 19.08.2007
Адрес: Зея
Сообщений: 15,794
Записей в дневнике: 71
Сказал(а) спасибо: 166
Поблагодарили 203 раз(а) в 86 сообщениях
Репутация: 75760
|
Все доступные в сети средства связи у меня есть, но используя я их для делового общения. Оказывать вам помощь в решении олимпиадных задач я принципиально не буду, так как это противоречит духу соревнования; я не желаю помогать вам обманывать ваших товарищей-соперников по олимпиаде, ведь большинство из них пишет программы самостоятельно.
|
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
Опции темы | |
Опции просмотра | |
|
|