а) 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.
Объяснение:
нашёл в интернете, но всё же надеюсь
