составте пргорамму которая заполняет массив а 1.8 случайными целыми числами в

Составте пргорамму которая наполняет массив а 1.8 случайными целыми числами в спектре от 1 до 10 и выводит на экран количество частей с чётными значениями и сумму массива с нечётнвми значениями

Задать свой вопрос
Руслан
массив двоичный
Анжелика Кривич
что означает a 1.8 это размерность?
Эвелина Шульпинова
а [1..8]
Регина Няжеметдинова
program dfg;vara: array [1..8] of integer;f,n,i:integer;beginn:=0;randomize ;for I:=1 to 8 dobegina[i]:= random(1,10);writeln(a[i]);if (a[i] mod 2)=0 thenbeginf:=1;endelse begin f:=0;end;n:=n+f;writeln(n);end;end.
Гройзик Юрий
program dfg;vara: array [1..8] of integer;f,n,i:integer;beginn:=0;randomize ;for I:=1 to 8 dobegina[i]:= random(1,10);writeln(a[i]);if (a[i] mod 2)=0 thenbeginf:=1;endelse begin f:=0;end;n:=n+f;end;writeln(n);end.
Вячеслав Асеткин
1-ое не правильно
1 ответ
Program dfg;
var
a: array [1..8] of integer;
f,n,i:integer;
begin
n:=0;
randomize ;
for I:=1 to 8 do
begin
a[i]:= random(1,10);
writeln(a[i]);
if (a[i] mod 2)=0 then
begin
f:=1;
end
else 
begin 
f:=0;
end;
n:=n+f;
end;
writeln(n);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт