Ответы
Ответ дал:
0
var
F: array [1..98] of integer;
s: integer;
begin
for s := 1 to 98 do
begin
write('Введите', ' ', s, ' ', 'член массива ---->');read(F[s]);
end;
end.
F: array [1..98] of integer;
s: integer;
begin
for s := 1 to 98 do
begin
write('Введите', ' ', s, ' ', 'член массива ---->');read(F[s]);
end;
end.
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
8 лет назад
8 лет назад
8 лет назад