Есть ответ 👍

Выпишите основные понятия главы 1 и дайте их определения

259
367
Посмотреть ответы 2

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


Qweqweqweqweqweqweqweqweqweqweqweqe

Const n=15; var a: array[1..n] of integer; i,k,c: integer; begin k: =0; c: =0; writeln('буква м - 1, буква ж - 2.'); for i: =1 to n do begin readln(a[i]); if a[i]=1 then k: =k+1 else c: =c+1; end; writeln(k,' - м, ',c,' - ж.'); end.

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