Написать простую программу(паскаль). дано три числа a, b, c .найти среди них минимальное.
189
281
Ответы на вопрос:
Var a: array [1..3] of integer; a,b,c,i,min : integer; begin readln(a,b,c); for i: =1 to 3 do readln(a[i]); min: =a[1]; for i: =1 to 3 do if a[i]writeln(min); end.
Program z1; uses crt; var a,b,c,min: integer; begin writeln ('vvedite a,b,c'); readln(a,b,c); if a < b then min: =a else min: =b; if min> c then min: =c; writeln('minimal: ',min); end.
Var m,n,s,x: integer; beginreadln(m,n); x: =m; while (m> 0)and(n< > 0)and(x> =n) dom: =m-n; s: =0; while m< 1 dobegins: =s+1; m: =m+1end; m: =x; x: =n; while (n> 0)and(m< > 0)and(x> =m) dobeginn: =n-m; s: =0end; while n< 1 dobeginn: =n+1; s: =s+1end; writeln(s)end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
ніна09120301.10.2020 19:22
-
Яра383836737319.07.2022 04:56
-
радмир140215.03.2022 06:32
-
JIuchno31.01.2022 22:22
-
lidafilinp016fh16.03.2023 03:14
-
HeeeeelpPlz28.10.2022 23:23
-
124688117.05.2023 20:52
-
А04рлан0526.01.2023 13:22
-
Misha3107198617.04.2023 04:03
-
ulashn06.03.2023 21:17
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.