Написать программу, определяющую по длинам сторон а,в и с является ли треугольник равнобедренным.
129
302
Ответы на вопрос:
//pascal var a,b,c: integer; begin readln(a,b,c); if ((a=b) and (a< > c) ) or ((a=c) and (a< > b)) or ((b=c) and (b< > a)) then writeln('треугольник равнобедренный') else writeln('треугольник не равнобедренный'); end;
pascal (гдето
program treska;
var a,i,k,b,b2,b3: integer;
begin
for i: =100 to 999 do
begin
a: =sqr(i);
k: =a-i;
b: =a-k;
if i=b then write (i,' ');
end;
readln
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
коля82721.08.2021 23:24
-
ctalin12312306.07.2022 14:42
-
УмничкаХороша19.03.2021 20:00
-
8962775012221.04.2021 15:49
-
GORH812.06.2022 23:54
-
nikav92com25.04.2023 05:53
-
ponterez25.09.2021 05:44
-
терменатор603.12.2022 22:55
-
somov10103.09.2021 14:03
-
aidarbI412325.07.2021 10:43
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.