Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ If-> Then -> Else

Автор: DZZRtt 28.11.2006 11:55

Я написал работающую программу, которая определяет принадлежит ли точка кругу с заданным радиусом

Код

l;=sqrt(sqr(x1-x2)+sqr(y1-y2));

if l<=r then
begin
writeln ('точка принадлежит кругу');
end
else
begin
writeln ('точка не принадлежит кругу');
end;



если после then и else убрать begin. a после writeln end. То выдается сообщение об ошибке
error in statement
но после того как я написал свою наткнулся в сети на похожую програмку в которой begin и end отсутствуют
и при этом она работает нормально. Пожалуйста объясните почему

Автор: Felix Miller 28.11.2006 13:00

А можно увидеть весь текст программы?

Автор: volvo 28.11.2006 13:15

Цитата
Пожалуйста объясните почему
Потому, что ПЕРЕД Else точки быть не должно, а у тебя (если ты просто уберешь Begin/End) она будет...