Даны целые числа А В Составить программу которая выводит квадрат суммы чисел если число А делится на число В без остатка в противном случае - квадрат числа

Question

Информатика

Паллидия

18 марта, 11:06

Даны целые числа А В Составить программу которая выводит квадрат суммы чисел если число А делится на число В без остатка в противном случае - квадрат числа

+3

Ответы (1)

Знаете ответ на вопрос?

Камилка · Answer 1

Vara, b:integer; begin a:=ReadInteger ('Введите a') ; b:=ReadInteger ('Введите b') ; if a mod b=0 then begin write (Sqr (a+b)) end; if a mod b0 then begin write (SQR (a)) end; end.