Паскаль

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

Question

Информатика

Васюта

14 февраля, 14:58

Паскаль

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

+3

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