Grechk
27.05.2023 07:19

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

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
аньён1
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.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота