Помогите)) Программа запрашивает 2 целых числа после чего выводит ** экран их сумму,...

Question

Помогите))
Программа запрашивает 2 целых числа после чего выводит на экран их сумму, произведение и разность квадратов

Comments

Язык?

Answer 1

Var
  a, b: integer;

begin
  write('Первое число: ');
  readln(a);
  write('Второе число: ');
  readln(b);
  writeln('Сумма квадратов A и B: ', sqr(a) + sqr(b));
  writeln('Произведение квадратов A и B: ', sqr(a) * sqr(b));
  writeln('Разность квадратов A и B: ', sqr(a) - sqr(b));
end.