Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
VladSuperMozg
09.09.2020 03:25 •
Информатика
Составьте алгоритм, с которого можно определить, является ли треугольник с заданными длинами сторон a, b, c равносторонним
Показать ответ
Ответ:
toroshinaalena
15.07.2020 09:51
Var a,b,c:integer; //стороны
begin
writeln('Введите длины сторон:');
read(a,b,c);
if (a=b)and(a=c)and(b=c) then
writeln('Треугольник равносторонний')
else
writeln('Треугольник не равносторонний');
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
katyunyakim123
03.03.2023 15:04
Напишите программу которая заполняет массив из 10 элементов случайными числами на отрезке [50;150] и находит в нем минимальный и максимальный элементы и их номера...
Giy
09.05.2022 21:20
1)Какая формула соответствует следующему сложному высказыванию? “Если Вы цените своё время (а) и бережете свои нервы (b), то Вы предпочитаете Linux (c), а не Windows...
w11Maxim11w
06.10.2020 15:56
Надо написать на языке python,...
lubvic77
05.12.2021 16:06
Кр по информатике осталось 5 мин...
Lakers44
09.01.2022 02:44
Определите, что будет напечатано в результате выполнения программы:Program mash;Vark, m: Integer;Dat: array[1..10] of integer;BeginDat[1]:= 1; Dat[2]:= 9;Dat[3]:=...
pineapplenastya1
27.12.2020 08:15
Тест1. Как дословно переводится с латинского языка термин«мультимедиа»?a) «Большой объём»b) «Многие средства»c) «Многие знания»2. Что из перечисленного является примером...
ка566
11.02.2020 15:36
Тінтуірдің оң жақ батырмасын басқанда пайда болған Контекстік мәзір терезесінде қандай командалар орналасқан?...
yarikplay13
26.02.2022 17:37
Запиши программу в Паскале для вычисления площади прямоугольника со сторонами b и m. image.jpg var b, m,s:word; begin writeln( Введи длину и ширину прямоугольника...
kuanyshqz
27.11.2022 03:35
Найдите угловой коэффициент касательной к графику функции y=4x^2+1 в точке х0=1...
зюзя24
25.03.2022 10:12
На основании приведенных ниже данных (в млрд. долл.) составьте балансовый отчет центрального банка страны: Золотые сертификаты 10 Другие обязательства и собственный...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
writeln('Введите длины сторон:');
read(a,b,c);
if (a=b)and(a=c)and(b=c) then
writeln('Треугольник равносторонний')
else
writeln('Треугольник не равносторонний');
readln;
end.