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

Question

Информатика

Томуня

21 апреля, 19:10

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

+1

Ответы (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.