Задание 1. Исправить ошибки программы и вывести вместе с ответом слово "молодец.".

Program z1

Var N - integer

Begin write (введи число)

read (N)

N = 2*N

write ('N=', N)

End.

Program z1; {в конце этой и каждой следующей строки дописываем "; "}

Var N : integer; {вместо "-" ставим ":" и }

Begin write ('введи число') ; { содержимое скобок берем в кавычки }

read (N) ;

N : = 2*N; {перед знаком "=" дописываем двоеточие}

write ('N=', N, ' молодец.') ; { через запчтую дописываем в кавычках молодец}

End.