Дан массив из 6 элементов целых чисел
Ввод – датчик случайных чисел Вывод в одну строку
Замените все четные элементы числом 5
Ввод – датчик случайных чисел Вывод в одну строку
Замените все четные элементы числом 5
More Questions From This User See All
Answers & Comments
Ответ:
program z1;
var a:array[1..6]of integer;
i:integer;
begin
write('Массив: ');
for i:= 1 to 6 do
begin
a[i]:= random(10);
write(a[i]:3)
end;
writeln;
write('Массив: ');
for i:= 1 to 6 do
begin
if a[i] mod 2 = 0 then a[i]:=5;
write(a[i]:3)
end
end.
Объяснение:
Чётный элемент - это элемент значение которого чётное число.
Если чётный элемент - это элемент индекс которого чётное число, то строку
if a[i] mod 2 = 0 then a[i]:=5;
заменить на
if i mod 2 = 0 then a[i]:=5;