Цикл for. pascal заранее !
1.напечатать таблицу умножения на 4. вывод на экран должен быть в виде «2*4=8».
2.вывести на экран все числа на промежутке [234..789] заканчивающиеся на 2 или 3 и начинающиеся на четную цифру
3.вводятся 4 числа: a, b, c и d. выведите все числа на отрезке от a до b, остаток c при делении на d.

1)

var i: integer;

begin

for i:=1 to 10 do writeln(i,'*4=',i*4);

end.

2)

var i: integer;

begin

for i:=234 to 789 do

if((i mod 10=2) or (i mod 10=3)) and ((i div 100) mod 2=0)

then write(i,' ');

end.

3)

var a,b,c,d,i: integer;

begin

readln(a,b,c,d);

for i:=a to b do

if(i mod d=c) then write(i,' ');

end.

PascalABC.NET

begin

 // 1

 for var i := 1 to 10 do

   Writeln(i, '*4=', i * 4);

 // 2

 for var i := 234 to 789 do

   if (i div 100 mod 2 = 0) and

     ((i mod 10 = 2) or (i mod 10 = 3)) then

       Print(i);

 Writeln;

 // 3

 var a, b, c, d: integer;

 Read(a, b, c, d);

 for var i := a to b do

   if i mod d = c then

     Print(i)

end.