Ответ Автор - eloren52 4 строчка: отсутствует ";"4 строчка: write вместо writeln, чтобы не было переноса строки (так как считывание данных должно быть в виде: write(); readln(a);10 строчка: отсутствует ";"