Паскаль

5.3 Напечатать "столбиком": а) все целые числа от 20 до 35 б) квадраты всех целых чисел от a до 50 (значение a вводится с клавиатуры; b>=10) в) третьи степени всех целых чисел от a до 50 (значение a вводится с клавиатуры; a<=50); г) все целые числа от a до b (значения a и b вводятся с клавиатуры; b>=a).

Question

Информатика

Егор

4 сентября, 23:34

Паскаль

5.3 Напечатать "столбиком": а) все целые числа от 20 до 35 б) квадраты всех целых чисел от a до 50 (значение a вводится с клавиатуры; b>=10) в) третьи степени всех целых чисел от a до 50 (значение a вводится с клавиатуры; a<=50); г) все целые числа от a до b (значения a и b вводятся с клавиатуры; b>=a).

+2

Ответы (1)

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

Аксентий · Answer 1

5.3

а) var i: integer;

begin

for i:=20 to 35 do writeln (i);

end.

б) var i, a: integer;

begin

read (a);

for i:=a to 50 do writeln (i*i);

end.

в) var i, a: integer;

begin

read (a);

for i:=a to 50 do writeln (i*i*i);

end.

г) var i, b, a: integer;

begin

read (a, b);

for i:=a to b do writeln (i);

end.