Ввести а и б и вывести квадраты и кубы чисел от а до б

Пример:

Введите границы интервала: 4 6

4: 16 64

5: 25 125

6: 36 216

Question

Информатика

Модеста

14 марта, 07:19

Ввести а и б и вывести квадраты и кубы чисел от а до б

Пример:

Введите границы интервала: 4 6

4: 16 64

5: 25 125

6: 36 216

+3

Ответы (1)

Знаете ответ?

Арсентий · Answer 1

Var

a, b: integer;

begin

write ('граница а? ') ;

readln (a) ;

write ('граница б? ') ;

readln (b) ;

for var i:=a to b do

writeln (i, ': ', sqr (i), ' ', i*i*i) ;

end.

Ввести а и б и вывести квадраты и кубы чисел от а до бПример:Введите границы интервала: 4 64: 16 645: 25 1256: 36 216

Ввести а и б и вывести квадраты и кубы чисел от а до б

Пример:

Введите границы интервала: 4 6

4: 16 64

5: 25 125

6: 36 216