Регистрация
КатяСимагина1
14.12.2021 20:02
Информатика
Есть ответ 👍

Определить являеться ли треугольник со сторонами (a,b,c) равносторонним.

234
290
Посмотреть ответы 2

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

aminasulik
aminasulik
4,4(9 оценок)
Var a,b,c: integer; begin readln(a,b,c); if (a=b) and (b=c) and (a=c) then write('равносторонний') else write('не равносторонний'); end.
kizzka
kizzka
4,4(11 оценок)

var y,x: real;

begin

x: =-2;

while x < = 2 do begin

y: =sqr(x)-2x; {считаем значение функции}

writeln(y); {выводим значение функции}

x: =x+0.5; {наш шаг цикла}

end;

end.

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