Есть ответ 👍

Program z1; var a, b, c, ab, ac ; integer; begin writeln ('введите координаты а'); readln (a); writeln ('введите координаты в'); readln (с); writeln ('введите координаты с'); readln (c); ab: = abc (a-b); ac: = abc (a-c); if ab writeln ('расстояние =; ab); else где ошибка? она точно где-то есть,

145
265
Посмотреть ответы 2

Ответы на вопрос:


Ошибка есть и она не одна. 1. код не полностью - после else должно быть что-то еще и обязательно замыкаться end. 2. abc - не такой функции в паскале, возможно вы имели в виду abs - абсолютная величина, т.е. модуль. 3. if ab then это тоже не верно, т.к. ab - не является логическим выражением или булевой пременной - видимо не дописал: if ab> ac
pollllyyy
4,7(89 оценок)

if (x1-x> 0)and(y1-y> 0)

then write('prenadlejit')

else write('ne prinad');  

Популярно: Информатика