FreeProgrammer
5 строка. Ключевое слово begen, а должно быть begin 7 строка. В конце строки пропущен знак окончания строки ";" 8 строка. Оператор ввода указан readen(x), а нужно readln(x) 9 строка. В операторе цикла параметр цикла i приравнивается к 1, а нужно присваивать, т.е. i:=1 (пропущено двоеточие перед =) 18 строка (последняя). Конец программы всегда отмечается знаком "точка", она пропущена, т.е. нужно написать end.
Answers & Comments
7 строка. В конце строки пропущен знак окончания строки ";"
8 строка. Оператор ввода указан readen(x), а нужно readln(x)
9 строка. В операторе цикла параметр цикла i приравнивается к 1, а нужно присваивать, т.е. i:=1 (пропущено двоеточие перед =)
18 строка (последняя). Конец программы всегда отмечается знаком "точка", она пропущена, т.е. нужно написать end.