Помощь - Поиск - Пользователи - Календарь
Полная версия: Точка входит в область
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
TheX3
Подскажите пожалуйста где ошибочка...что-то не пойму..
ЗЫ ошибка 113 в строке else (середина прогр)
volvo
Точку с запятой перед Else убери, ее не должно быть...
TheX3
Убрал...ошибка чуть ниже...else ошибка 85 ";"
Прям в следующем елсе.... wacko.gif
volvo
А тут у тебя вообще структура нарушена... Что ты хотел сказать вот этим компилятору:
begin
if y>=d/2 then
writeln ('Tochka vhodit v'); { <--- Вот это у тебя относится к THEN }

{ Весь этот блок идет ПОСЛЕ Then }
begin
if y<=-d/2 then
writeln ('Tochka vhodit v')
else
writeln ('Tochka ne vhodit v');
end

else { <--- ЭТО куда относится? К какому If ? }
writeln ('Tochka ne vhodit v');
end
TheX3
Хм..там вроде лесенкой надо спускаться ? или нет ? я просто только начинаю в паскале работать..
TheX3
ЧТо мне надо переделать для того,чтобы прога заработала ? mega_chok.gif
мисс_граффити
begin переставить. как минимум...
TheX3
какой и куда ?) тот что в серединке ?
мисс_граффити
if y>=d/2 then
begin
writeln ('Tochka vhodit v');

(почему - см. сообщение volvo)
TheX3
ПОсмотрите пожалуйста...я набросал..но вроде там начался бред после половины..там где елсы пошли..я просто не представляю как будет закрываться бегин..и там же ставиться елсе..в каком порядке ?
и еще вопрос..после ендов точку с запятой надо ставить ?
мисс_граффити
конструкция имеет вид
if (условие) then
begin
(действия, выполняемые по ветке "да");
end {обрати внимание - БЕЗ точки с запятой!}
else
begin
(действия, выполняемые по ветке "нет");
end;

; МОЖНО не ставить перед end
; НЕЛЬЗЯ ставить перед else

Во всех остальных случаях - ставить.
TheX3
Спасибо )) попробую....думаю до завтра че придумаю.. give_rose.gif
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.