Дано два положительных числа А и В. Найти большее и возвести в третью степень

Question

Информатика

Ажабике

26 мая, 14:17

Дано два положительных числа А и В. Найти большее и возвести в третью степень

+4

Ответы (1)

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

Синам · Answer 1

Program Program1;

var a, b: integer;

begin

write ('Введите числа: ') ;

readln (a, b) ;

if a > b then a: = a*a*a

else b: = b*b*b;

end.

/ / Никаких гарантий.