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

Question

Информатика

Манюха

15 октября, 00:08

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

+4

Ответы (2)

Знаете ответ на вопрос?

Доша · Answer 1

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.

Светуня · Answer 2

var a, b, i:integer;

begin

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

readln (a, b) ;

i:=a+b;

writeln ('i=', i) ;

readln;

end.

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