profile
Опубликовано 5 лет назад по предмету Информатика от MariaSpecial

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

  1. Ответ
    Ответ дан Aillianna

    var

       a, b: integer;


    begin

       readln(a, b);

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

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

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

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

    end.

Самые новые вопросы