Предмет:
ИнформатикаАвтор:
abraham41Ответ:
a,k,i,n:integer;
begin
k:=0;{обнуляем счётчик}
readln(n);{вводим количество элементов в массиве}
readln(a);{задаём число а, с которым потом будем сравнивать}
for i:=1 to n do{запускаем цикл}
begin
if (b[i] > a) and ((b[i] mod 5)=0) then{проверка на выполнение условий,заданных в задаче}
k:=k+1;{при выполнении условия,увеличиваем счётчик на один}
end;
writeln(k);{выводим количество элементов, удовлетворивших условию задачи}
end.
Автор:
caleb379Добавить свой ответ
Предмет:
Українська літератураАвтор:
jettОтветов:
Смотреть
Предмет:
МатематикаАвтор:
rubioОтветов:
Смотреть
1. пружина с нагрузкой имеет длину 65 см. пружина имеет коэффициент жесткости 36 н/ м. какой была длина пружины без действия силы 5 н?
2. ящик массой 25 кг стоит на горизонтальном полу. коэффициент трения между полом и ящиком равен 0,35. к ящику в горизонтальном направлении прикладывают силу 36 н. сдвинется ли он с места. какова сила трения между ящиком и полом?