Найти ошибку в программе, program nastya; var - вопрос №26194718 от Neznaika123shsgwheh 29.08.2020 14:39

Question

Информатика: Найти ошибку в программе, program nastya; var n: integer; procedure perewod8(n: integer); begin if n 1 then perewod8(n div 8); write (n mod 8); end; begin write ( введите натуральное число n= ); read(n); perewod8(n); end.

Neznaika123shsgwheh · Answer

А компьютер не выделяет красненьким примерное место, где есть ошибка? ...

Найти ошибку в программе, program nastya; var n: integer; procedure perewod8(n: integer); begin if n> 1 then perewod8(n div 8); write (n mod 8); end; begin write ('введите натуральное число n='); read(n); perewod8(n); end.