Вот это строчка if b=c or c=a then, если просто b=c, a не работает program treygolnik; var a, b, c: integer; begin read(a,b,c); if b=c or c=a then begin writeln('треугольник равносторонний'); end else begin writeln ('треугольник не равносторонний') end; end.
222
275
Ответы на вопрос:
Авот так работать будет:
program treygolnik;
var a, b, c: integer;
begin
read(a,b,c);
if (b=c) or (c=a) then
begin
writeln('треугольник равносторонний');
end
else
begin
writeln ('треугольник не равносторонний')
end;
end.
Популярно: Информатика
-
РікаРо06.02.2020 07:31
-
nigar2621.07.2021 11:52
-
voicehovakseneлеля18.06.2023 05:26
-
верадубовая200716.04.2022 11:08
-
olgadulebenez17.04.2021 12:03
-
daniilmosl15.02.2021 05:44
-
Вывыия28.05.2020 09:06
-
SchneiderOK12.10.2021 03:56
-
даsha329.03.2022 09:38
-
Кристина111037329.06.2020 14:17