информатика! допишите пожалуйста программу
k:=0;
for i:=1 to n do
if a[i]>50 then k:=k+1;
write ('k=', k);
Ответы
Ответ дал:
0
Решение представлено во вложении.
Язык: Pascal
Приложения:
![](https://st.uroker.com/files/2c4/2c41dd224aa7dc4026aea0347f1be07e.png)
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад
8 лет назад