Pascal
ввод <span>ReadLn(A1,A2,...AK)
вывод Whrite</span>(A1,A2,...AK)
QBasic
ввод Print
вывод Input
Если шаг не задан явно, значит он равен 1.
Машинное слово- это колич-во данных, кот-е процессор может обработать за одну операцию.
Const nmax = 5;
var a:array [1..nmax] of integer;
i,k:integer;
begin
k:=0;
randomize;
for i:=1 to nmax do
begin
a[i]:=random(11)+10;
write (a[i],' ');
if a[i] mod 5 = 0 then inc(k);
end;
writeln;
writeln ('Kol-vo: ',k);
end.