Даны два ненулевых числа. найти их сумму, разность, произведение и частное их квадратов. язык pascal

Sultikutan Sultikutan    1   20.05.2019 07:20    4

Ответы
katyazabriyan katyazabriyan  13.06.2020 15:01

var

   a, b: integer;


begin

   readln(a, b);

   writeln('Сумма: ', a + b);

   writeln('Разность: ', a - b);

   writeln('Произведение: ', a * b);

   writeln('Частное квадратов: ', sqr(a) / sqr(b));

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика