Напишите программу, которая в последовательности натуральных чисел определяет минимальное число, оканчивающееся на 6. Программа получает
на вход количество чисел в последовательности, а затем сами числа. последовательности всегда имеется число, оканчивающееся на 6. Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число оканчивающееся на 6. минимальное число,
Знаешь ответ?
Чтобы оставить ответ, войдите или зарегистрируйтесь.
Ответ или решение 1
Гузяль
var
n, i, a, min : integer ;
begin
readln(n) ;
min : = 30001 ;
for i : = 1 to n do
begin
readln(a) ;
if (a mod 10 = 6) and (a < min) then
min : = a ;
end ;
writeln(min)
end.
n, i, a, min : integer ;
begin
readln(n) ;
min : = 30001 ;
for i : = 1 to n do
begin
readln(a) ;
if (a mod 10 = 6) and (a < min) then
min : = a ;
end ;
writeln(min)
end.
Новые вопросы в разделе Другие предметы
Январий
19.11.2023, 12:25
ЯВКУСНЫЙДОШИРАК)))))))
19.11.2023, 12:24
siddiq
19.11.2023, 12:23
Носова Елена
19.11.2023, 12:22
234567
19.11.2023, 12:21
