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

A) var i: integer; beginfor i: =20 to 35 dowriteln (i); readlnend. Б) var i,b: integer; beginwrite ('b (b>=10) — '); readln (b); for i: =10 to b dowriteln (sqr (i); readlnend. В) var i,a: integer; beginwrite ('a (a <= 50) — '); readln (a); for i: =a to 50 dowriteln (sqr (sqr (i); readlnend. Г) var i,a,b: integer; beginwrite ('a (a <= b) — '); readln (a); write ('b (b>=a) — '); readln (b); for i: =a to b dowriteln (i); readlnend.