Паскаль5.3 Напечатать "столбиком": а) все целые числа от 20 до 35 б) квадраты всех целых...

Question

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

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.