Напишите программу, которая в последовательности натуральных чисел определяет количество...

0 голосов
13 просмотров

Напишите программу, которая в последовательности натуральных чисел
определяет количество чисел, кратных 5


image

Информатика (181 баллов) | 13 просмотров
0

программа?

Дан 1 ответ
0 голосов
Правильный ответ

Т.к. автор не указал требуемый язык программирования, то я напишу удобный мне - Pascal.

var a:array[1..1000] of integer; 
      i, n, min:integer;
begin
min:=30001;
writeln('введите количество элементов массива');
readln(n);
for i:=1 to n do begin
writeln('введите число');
readln(a[i]);
end;
for i:=1 to n do
if (a[i]0) then min:=a[i];
writeln('минимальное положительное число=',min);
end.

(90 баллов)
0

Спасибо)