Написать программу которая в последовательности натуральных чисел определяет минимальное число оканчивающийся на 4
Написать программу которая в последовательности натуральных чисел определяет минимальное число оканчивающийся на 4
Ответ(ы) на вопрос:
Гость
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
Не нашли ответ?
Похожие вопросы