На вход подается число не меньше 0.Вывести число от данного до 10. если число изначально больше 10 завершить программу

Program lol;
var a:integer;
beginreadln(a);
if(a>0) and (a<10) then writeln(a)
else
end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку