Даны два ненулевых числа. найти их сумму, разность, - вопрос №1580023 от aidaadilbekova 16.09.2021 15:16

Question

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

aidaadilbekova · Answer

var    a, b: integer;begin    readln(a, b);    writeln( Сумма: , a + b);    writeln( Разность: , a - b);    writeln( Произведение: , a * b);    writeln( Частное квадратов: , sqr(a) / sqr(b));end....