Харлампий
7 год назад
Даны два числа. Вычислить их сумму. Если она превышает 1000, то вычислить и вывести квадрат. первого числа, иначе-вычислить и вывести куб второго числа
ОТВЕТЫ
Тарасий
Jul 18, 2019
Var a,b:integer;
begin
readln(a,b);
if((a+b)gt;1000) then writeln(a*a, - квадрат первого числа)
else
writeln(b*b, - куб второго числа);
end.
begin
readln(a,b);
if((a+b)gt;1000) then writeln(a*a, - квадрат первого числа)
else
writeln(b*b, - куб второго числа);
end.
290
