1.Напишите программу, печатающую все целые числа от 10 до 100.

Var I:integer

Begin

For I;=100 to 999 do//100 и 999 на свои значения

Begin

if l mod 47=43 then WriteLn(l)

End

End

1. Мне не выдает тот который должен быть