Предмет: Информатика,
автор: ilyap0375
Нужно из блок схемы на Паскале написать
Приложения:

Ответы
Автор ответа:
1
var
N: array[1..15] of integer;
i, k: integer;
begin
for i := 1 to 15 do
begin
N[i] := random(11);
write(N[i], ' ')
end;
writeln;
k := 0;
for i := 1 to 15 do
if N[i] mod 2 = 0 then
k := k + 1;
writeln(k)
end.
Похожие вопросы
Предмет: Алгебра,
автор: 13spongebob13
Предмет: Геометрия,
автор: stasisinula95
Предмет: Английский язык,
автор: 098sofa
Предмет: География,
автор: Лизочка5671
Предмет: Математика,
автор: Аноним