Составить программу для Паскаля. Запросить у пользователя два числа и вывести на экран результат суммы, разности, произведения и частного числа этих чисел полным ответом.

Question

Информатика

Цвета

16 апреля, 06:32

Составить программу для Паскаля. Запросить у пользователя два числа и вывести на экран результат суммы, разности, произведения и частного числа этих чисел полным ответом.

+1

Ответы (2)

Знаешь ответ?

Петрята · Answer 1

var a, b, i:integer;

begin

writeln ('Введите 2 числа');

readln (a, b);

i:=a+b;

writeln ('i=', i);

readln;

end.

Для остальных операций заменяеш знаки вот в этой строчке i:=a+b;

Христюха · Answer 2

program task;

var a, b:integer;

begin

write ('a=');

readln (a);

write ('b=');

readln (b);

writeln;

writeln (a,'+', b,'=', a+b);

writeln (a,'-', b,'=', a-b);

writeln (a,'*', b,'=', a*b);

write (a,'/', b,'=');

if b0 then

writeln (a/b)

else

writeln ('division by zero');

readln;

end.