Подсчитать колво цифр(чисел) не отрицательных среди n-произвольных и вывести на экран
186
392
Ответы на вопрос:
var a: array[1..100] of integer;
i,n,k: integer;
begin
k: =1;
read(n); //вводите количество самих элементов
for i: =1 to n do begin//ввод самих элементов
read(a[i]); if a[i]> =0 then k: =k+1; //подсчет элементов > 0
end;
writeln('количество не отрицательных элементов=',k); //вывод
readln;
end.
1. B
2. D
3. C
4. B
5. A
6. D
7. C
8. A
9. B
10. A
11. B
12. B
13. B
14. A, C, E
15. B
16. C
17. D
18. B
19. A
20. C
21. C
Популярно: Информатика
-
vasukulia02.03.2021 07:08
-
yusifmailov105.02.2023 09:04
-
BlackZhopa28.12.2022 08:52
-
polina5m17.05.2021 02:43
-
paxand24.05.2022 22:34
-
саша424629.10.2022 13:32
-
dinoirino1817.05.2023 13:38
-
Быковских22.09.2021 03:14
-
narutoudzumaki22825.06.2022 09:45
-
violetta23807.05.2021 09:54