10.12.2011, 00:44
|
#7 (permalink)
|
|
Новичок
Регистрация: 09.12.2011
Сообщений: 7
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Цитата:
Сообщение от AlexZir
Возьмите листинг, удалите лишние переменные и строки с операциями, оставьте только одну арифметическую операцию и будет вам счастье/
Вот листинг для операции сложения, исходные данные вводятся с клавиатуры. При необходимости самостоятельно добавьте чтение данных из файла, это нетрудно  .
Код:
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.
Любой листинг, который здесь выкладывается, является своего рода рабочей программой, так как проверяется перед публикацией в среде программирования. |
а у вас есть средства связи?аська,скайп к примеру?
|
|
|