Одномерные массивы в Pascal ABC 9 класс

задачи с использованием одномерных массивов
Формирование умения

3, 4, 5] b = [3, 4, 5, 6, 7] с =

расположенных в памяти непосредственно друг за другом.

типа, объединенных одним именем, где каждый элемент имеет свой номер.

of integer;

1 to N do
read(a[i]);


б) с использованием генератора случайных

[1..10] of integer;
I : byte ; {переменная

Writeln (a[i]);

array [1..10] of integer;
I : byte ;

array [1..100] of integer;
I, n: byte;
Begin

For i:=1 to n do
Readln (b[i]); { ввод массива b}
For i:=1 to n do
C[i]:=a[i]+b[i];{ вычисление суммы массивов }
For i:=1 to n do
write (c[i],' '); { вывод массива с }
end.

датчиком случайных чисел на интервале [-23, 34].
Program posled;
Var a: array[1..100]

кратных 5
var n, s, k, g: integer;
begin
s:=0;
readln(n);
for k:=1 to n

if (g mod 5 = 0) then
s:=s+1;
end;
writeln(s);
end.