Проверьте, верно ли сделал. Прога пишет, что заместо else должен быть
Проверьте, правильно ли сделал. Прога пишет, что заместо else обязан быть оператор.
program qq;
var a,b,c:integer;
begin
writeln('Введите три угла');
readln(a,b,c);
if(a+b+c)lt;gt;180 then
writeln('Не может быть треугольником');
else if(a=90) or (b=90) or (c=90)then
writeln('прямоугольный треугольник');
else if(agt;90) or (bgt;90) or (cgt;90)then
writeln('Тупоугольный треугольник');
else writeln('Остроугольный');
end.
program qq;
var a,b,c:integer;
begin
writeln('Введите три угла');
readln(a,b,c);
if(a+b+c)lt;gt;180 then
writeln('Не может быть треугольником');
else (a=90) or (b=90) or (c=90)then
writeln('прямоугольный треугольник');
else (agt;90) or (bgt;90) or (cgt;90)then
writeln('Тупоугольный треугольник');
else writeln('Остроугольный');
end.
Обязано быть так
-
Вопросы ответы
Статьи
Информатика
Статьи
Математика.
Разные вопросы.
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.