Найти наибольшее из трёх чисел (3 числа вводим с клавиатуры). паскаль. через while. с комментариями. желательно попроще.
185
411
Ответы на вопрос:
var n, number, max: integer;
begin
n : = 3;
while n > 0 do
begin
readln(number);
if n = 3 then max : = number
else if max < number then max : = number;
n : = n - 1;
end;
writeln('максимальное число = ', max);
end.
vari: integer; beginfor i : = 10 to 99 doif *i) mod 10) = 8) and *i) mod 10) = 4) thenwrite(i,' '); end.
p.s таких чисел нет
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
kris334334kris33433413.09.2021 15:38
-
ANgeLOL111225.12.2021 20:01
-
tomas78701.03.2023 02:14
-
ssssss213r53224.06.2020 18:40
-
blablaloshka18.09.2021 06:05
-
Aminka21010207.06.2022 19:55
-
12345678910АБ226178421.10.2021 07:36
-
mymi1029.07.2022 11:45
-
helpmepleasehelpls05.04.2020 15:31
-
geracim118.04.2020 06:29
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.