1.найти количество натуральных чисел, не превышающих - вопрос №2421818110052 от fastas32 14.02.2020 23:34

Question

Информатика: 1.найти количество натуральных чисел, не превышающих 100 и кратных 5. 2.создать массив а из 10 элементов, принадлежащих промежутку (0; 25). вывести полученный массив на экран. подсчитать количество элементов, больших а [1]. все с паскаля

fastas32 · Answer

1.var i,k:integer;begink:=0;for i:=1 to 100 dobeginif (i mod 5 = 0) then k:=k+1;end;writeln (k);end....