Задать вопрос
30 января, 16:59

Помогите найти ошибку в программе,

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.

+2
Ответы (1)
  1. 30 января, 17:50
    0
    А компьютер не выделяет красненьким примерное место, где есть ошибка?
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Помогите найти ошибку в программе, Program nastya; var n: integer; Procedure Perewod8 (n:integer) ; begin If n>1 then perewod8 (n div 8) ; ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы