Регистрация
apomat1234
30.03.2020 17:40
Информатика
Есть ответ 👍

с номером с которым сможете. Оч надо, 8 класс, тема указана
​

297
482
Посмотреть ответы 1

Ответы на вопрос:

malaya108
malaya108
4,4(77 оценок)
Pascal: program z1; var i,  k, n, ch: integer; begin n: =0; ch: =0; for i: =1 to 15 do begin writeln('input number: '); readln(k); if(k mod 2=0) then ch: =ch+1 else n: =n+1; end; writeln('нечетных было  ', n); writeln('четных было  ', ch); end.

Популярно: Информатика