Регистрация
scvdnl
15.09.2020 12:42
Информатика
Есть ответ 👍

По сору информатики 6 класс 1 четверть ​

152
224
Посмотреть ответы 1

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

acre5422какаха
acre5422какаха
4,4(99 оценок)

varn,k,i, min: integer; a: array [1..100] of integer; beginwriteln ('vvel n'); read (n); writeln (n); k: =0; for i: =1 to n doread (a[i]);

min: =a[1]; for i: =1 to n doif a[i]=min then k: =k+1; writeln (k); end.

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