вывести на экран числа кратные 6 из интервала 50-100.
В Паскале АВС

var  i:integer;begin  i:=54;  repeat    Write(i:3);    i:=i+6  until i>100;  Writelnend.Результат 54 60 66 72 78 84 90 96