Program TELESHOP; var x: real; begin writeln (39;...39;); write (39;...39;); write

Program TELESHOP; var x: real; begin writeln (39;...39;); write (39;...39;); write (39;...39;); readln (x); if xamp;lt;=1 then begin if x=1 then begin writeln (39;...39;); writeln (39;...39;); end else begin writeln (39;...39;); end; *else begin writeln (39;...39;); end end. * - место оплошности. quot;встречено 39;else39;, а ожидалось операторquot; Вопрос: в чем ошибка?

Задать свой вопрос
1 ответ

else на котором программка встретила ошибку относиться к if xlt;=1, что бы поставить это else поначалу необходимо закрыть begin, стоящий после описанного выше if, т.е. у вас обязано быть 2 end попорядку. Что бы поправить программу, после строчки, где программа выдает ошибку поставьте еще один end, что бы закрыть второй begin программки.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт