Написать программу которая в последовательности натуральных чисел определяет минимальное число оканчивающийся на 4
149
285
Ответы на вопрос:
Var t,n,i,m,k: integer; begin readln(n); read(t); while (t mod 10 < > 4) do begin read(t); k: =k+1; end; m: =t; for i: =k to n do begin read(t); if (t mod 10=4 and t< m) m: =t; end; writeln(m); end.
Популярно: Информатика
-
ArianaLi01.09.2022 13:38
-
Marrrrrrk07.12.2022 16:32
-
anuta13603.05.2022 05:06
-
lazmax200027.07.2021 15:18
-
Xtrail29.03.2021 14:31
-
маргарита0000000022.06.2023 04:34
-
LanaAnn01.02.2022 09:48
-
Alex96xelA23.06.2021 17:47
-
nikitachymev21.09.2020 21:19
-
gregsorvenkov25.08.2022 18:59