Question

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

Answer 1

Ответ:

Var I:integer

Begin

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

Begin

if l mod 47=43 then WriteLn(l)

End

End

Answer 2

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

Answer 3

Ответ:

a = 10

while a < 101:

   print(a)

   a = a + 1