Предмет: Информатика,
автор: ShiroDark
СРОЧНО!!!РЕШИТЬ 4(только)
информатика 9 класс
Приложения:
Ответы
Автор ответа:
0
const Sz = 5; // Размер массива
var
a: array [1..Sz] of integer:=(2,4,6,8,10);
N: integer; // Количество элементов в массиве
i: integer;
begin
N:=5;
for i:=1 to N do
begin
if (a[i] mod 4)=0 then
a[i]:=i
else
a[i]:=a[i]*2;
end;
write('Вывод элементов массива: ');
for i:=1 to N do
write(a[i],' ');
end.
var
a: array [1..Sz] of integer:=(2,4,6,8,10);
N: integer; // Количество элементов в массиве
i: integer;
begin
N:=5;
for i:=1 to N do
begin
if (a[i] mod 4)=0 then
a[i]:=i
else
a[i]:=a[i]*2;
end;
write('Вывод элементов массива: ');
for i:=1 to N do
write(a[i],' ');
end.
Похожие вопросы
Предмет: Биология,
автор: alem240307
Предмет: Английский язык,
автор: maksimka300IQ
Предмет: Информатика,
автор: cheloveknomer123321
Предмет: Математика,
автор: fahragyr
Предмет: Алгебра,
автор: Аноним