Нужно из блок схемы на паскале написать

raksana6 raksana6    1   15.12.2019 23:27    0

Ответы
taraniariba taraniariba  27.08.2020 18:27

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика