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

таблица умножения

программа телепередач

телефонный справочник

прогноз погоды

меню в столовой

я пробовала у меня вышло 15 но возможны и другие варианты