Напишите программу , которая в последовательности 10-ти натуральных чисел определяет максимально число, оканчивающееся на 4. если таких чисел нет , вывести (no). (язык программирования -паскаль)
211
491
Ответы на вопрос:
Program primer; var n,i,max,z: integer; begin max: =0; for i: =1 to 10 do begin read(n); if(n mod 10 = 4) then begin inc(z); if(max< n) then max: =n; end; end; if(z> 0) then writeln(max) else writeln('no'); end.
Популярно: Информатика
-
nargis107717.12.2022 03:36
-
viktoria38810.06.2023 06:42
-
zeinalovazahra03.04.2021 11:04
-
permyashkinanap0a88m25.06.2020 19:24
-
Анжелика20061111110.05.2022 19:28
-
анна224729.01.2022 05:47
-
Marlie01.02.2022 21:17
-
ДарьяГусева1330.12.2022 13:19
-
ПомидоркаЛ17.05.2021 03:28
-
SkyZee28.02.2023 00:05