Даны два числа. вычислить их сумму. если она превышает 1000, то вычислить и вывести квадрат. первого числа, иначе-вычислить и вывести куб второго числа

KatiG KatiG    1   14.08.2019 10:10    0

Ответы
oskar9 oskar9  04.10.2020 18:23
Var a,b:integer;
begin
readln(a,b);
if((a+b)>1000) then writeln(a*a, ' - квадрат первого числа')
else
writeln(b*b, ' - куб второго числа');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика