:практическая работа №3. ветвления уровень a. напишите программу, которая получает с клавиатуры два целых числа и находит наибольшее и наименьшее из них. пример: введите два числа: 1 5 наименьшее число 1 наибольшее число 5 уровень b. напишите программу, которая получает с клавиатуры четыре целых числа и находит наибольшее из них. пример: введите четыре числа: 1 2 5 3 наибольшее число 5 уровень c. напишите программу, которая получает с клавиатуры возрасты трёх человек (антона, бориса и виктора) и определяет, кто из них старше. пример: возраст антона: 15 возраст бориса: 17 возраст виктора: 16 ответ: борис старше всех. пример: возраст антона: 17 возраст бориса: 17 возраст виктора: 16 ответ: антон и борис старше виктора. на языке паскаль.
189
479
Ответы на вопрос:
Program p1; var a,b: integer; begin writeln ('введите 2 числа'); readln (a,b); if a=b then writeln ('числа одинаковые') else if a> b then begin writeln ('наибольшее число ',a); writeln ('наименьшее число ',b); end else begin writeln ('наибольшее число ',b); writeln ('наиментшее число 10 ',a); end; end. program p2; var a,b,c,d: integer; begin writeln ('введите 4 числа'); readln (a,b,c,d); if a< b then a: =b; if c< d then c: =d; if a< c then a: =c; writeln ('наибольшее число ',a); end. program p3; var a,b,v: integer; begin writeln ('введите возрасты людей: '); write ('антона - '); readln (a); write ('бориса - '); readln (b); write ('виктора - '); readln (v); if (a=b) and (a=v) then writeln ('все люди одного возраста'); if (a=b) and (a> v) then writeln ('антон и борис старше виктора'); if (a=b) and (a< v) then writeln ('виктор старше всех') else if (v> a) and (v> b) then writeln ('виктор старше всех'); if (b=v) and (b> a) then writeln ('борис и виктор старше антона'); if (b=v) and (b< a) then writeln ('антон старше всех') else if (a> v) and (a> b) then writeln ('антон старше всех'); if (a=v) and (a> b) then writeln ('антон и виктор старше бориса'); if (a=v) and (a< b) then writeln ('борис старше всех') else if (b> v) and (b> a) then writeln ('борис старше всех'); end.
Площадь ромба вычисляется по формуле здесь , а - сторона ромба, которую надо найти сократим обе части на . получим умножим обе части на 2. a=6 - сторона ромба, а=-6 - не подходит по смыслу . ответ: а=6.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
dikushant01.06.2021 05:47
-
DoIIIuPak1813.10.2020 04:47
-
lololololololololool05.02.2020 23:13
-
Svetka72RUS20.06.2022 14:19
-
Dinastita12.06.2020 15:17
-
vitokle02.06.2021 18:16
-
laparoscopic24.09.2022 17:51
-
Alinыch1107.07.2020 03:49
-
lampusha07.07.2020 02:31
-
Юшут31.01.2021 13:07
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.