(20 баллов) Написать программу, запрашивающую натуральное число и выполняющую ввод чисел до тех пор, пока не будет введено введеное число, например: 7
12418627 нашли число!

Ответы

Ответ дал: daniilkey
0

var a,n:longint;

begin

readln(n);

while(a<>n) do readln(a);

end.

Ответ дал: Аноним
0
А можно ineger или read?
Ответ дал: daniilkey
0
Да, можно
Похожие вопросы