Паскаль

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

Question

Информатика

Веля

1 сентября, 02:09

Паскаль

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

+5

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