Информатика, опубликовано 2018-08-22 20:29:31 by Гость

Var a,b,c,p:real; begin writeln(введите размеры треугольника a,b,c); read(a,b,c); p:=a+b+c; if (a=b=c) then begin writeln(треугольник равносторонний); writeln(периметр треугольника,p); end else writeln (треугольник не равносторонний); end. ошибка Операция = не применима к типам boolean и real что сделать?

Ответ оставил Гость

If (a=b=c) then

Неправильно заданное условие.

Попробуй так: if (a=b) and (b=c) then

Не нашли ответа?

Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.