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

Пример:

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

4: 16 64

5: 25 125

6: 36 216

Question

Информатика

Леонтьич

23 марта, 03:15

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

Пример:

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

4: 16 64

5: 25 125

6: 36 216

+4

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