Ответы на вопрос:
Var a, b, c : real; begin if (a = b) and (a = c) and (b = c) then writeln("треугольник равносторонний") else writeln("треугольник не равносторонний")
Популярно: Информатика
-
Выполнить операцию сложения над двоичными числами: а) 101010+1101 б)1010+1010...
Даня168116.12.2022 16:45 -
По информатике, ! найти средне трех чисел...
stefaniiadr17.01.2021 10:02 -
Какое минимальное основание имеет система счисления 341 123 222 111...
superparty26.02.2020 12:26 -
Решить пример по информатике надо сам пример 1100111,2=x,16...
FeagTV23.11.2021 02:30 -
Водномерном массиве x(15) найти: произведение элементов, удовлетворяющих...
katasmajl29.04.2022 01:52 -
Книга содержит 126 страниц на каждой страницу 40 строк в каждой строке 56...
knyazik200312.11.2022 00:50 -
Хелпми, не ну обидно как-то......
Dan325122.11.2020 18:26 -
периметр периметр равнобедренного треугольника равен 34 см его боковая сторона...
stasleraz25.02.2020 23:48 -
5. Упростите выражение 1) Зm(2т — 1) - (m+3)(т - 2). 2) (6c + d (8c - 5d):...
natalia2734709.02.2023 04:08 -
Де живуть амфібії , рептилії, птахи та ссавці...
JusticeLeague07.02.2022 19:08