Математический форум Math Help Planet
Обсуждение и решение задач по математике, физике, химии, экономике Теоретический раздел |
Часовой пояс: UTC + 3 часа [ Летнее время ] |
новый онлайн-сервис число, сумма и дата прописью |
|
Часовой пояс: UTC + 3 часа [ Летнее время ] |
Страница 1 из 1 |
[ Сообщений: 2 ] |
|
Автор | Сообщение | |
---|---|---|
Turgenev1337 |
|
|
begin Writeln('Введите натуральное число:'); readln(a); b:=10; while b<=a do begin b:=b*10; while (c<=10) and (d<=10) do c:=a div 10; d:=a div b; f:=a mod 10; if c-d=0 then writeln('Да'); if f-d=0 then writeln('Да'); end; else begin Writeln('Нет'); end. Пишет: Встречено 'else', а ожидался оператор |
||
Вернуться к началу | ||
michel |
|
|
Во-первых, перед [math]else[/math] не должно стоять точки с запятой (даже если она стоит в предшествующей строке).
Во-вторых, Вы закрыли раньше времени блок [math]while[/math] оператором [math]end[/math] сразу после конструкции [math]if[/math], не успев описать альтернативу [math]else \; writeln("HET");[/math]. Стоящий в конце [math]begin[/math] вообще не нужен. В итоге должно быть: ................ if f-d=0 then Writeln('Да') else Writeln('Нет'); end; end. Возможно, Вы хотели альтернативу условию цикла [math]while[/math], когда он не может выполняться в самый начальный момент. Тогда надо оформить печать "Нет" через соответствующий условный оператор [math]if[/math] сразу после [math]end[/math] блока [math]while[/math]. В этом случае конструкция [math]else[/math] не применяется. |
||
Вернуться к началу | ||
За это сообщение пользователю michel "Спасибо" сказали: Turgenev1337 |
||
[ Сообщений: 2 ] |
Похожие темы | Автор | Ответы | Просмотры | Последнее сообщение |
---|---|---|---|---|
Не могу найти ошибку | 1 |
323 |
24 дек 2016, 16:00 |
|
Не могу найти ошибку
в форуме Дифференциальное исчисление |
10 |
661 |
20 апр 2014, 16:45 |
|
Не могу найти ошибку в ДУ Бернулли | 3 |
748 |
17 авг 2018, 19:35 |
|
Не могу найти ошибку в суждениях
в форуме Алгебра |
6 |
571 |
16 апр 2017, 00:14 |
|
Несостыковка. не могу найти ошибку
в форуме Комбинаторика и Теория вероятностей |
4 |
606 |
15 фев 2017, 22:06 |
|
Реакция опор( не могу найти ошибку)
в форуме Специальные разделы |
1 |
429 |
22 сен 2016, 23:25 |
|
Не могу найти ошибку (интегрирование иррациональных ф-ий)
в форуме Интегральное исчисление |
1 |
152 |
09 апр 2022, 04:29 |
|
Не могу найти ошибку в модели Simulink
в форуме MATLAB |
4 |
607 |
20 фев 2017, 14:11 |
|
Не могу найти ошибку при решении тройного интеграла
в форуме Интегральное исчисление |
7 |
208 |
14 апр 2022, 10:03 |
|
Не могу найти ошибку (противоречие) в своих доказательствах
в форуме Начала анализа и Другие разделы школьной математики |
2 |
337 |
14 фев 2019, 19:08 |
Часовой пояс: UTC + 3 часа [ Летнее время ] |
Кто сейчас на конференции |
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 13 |
Вы не можете начинать темы Вы не можете отвечать на сообщения Вы не можете редактировать свои сообщения Вы не можете удалять свои сообщения Вы не можете добавлять вложения |