Напишите программу, запрашивающую у пользователя N целых чисел и выводящую на экран: а) количество нулей
в последовательности; б) количество положительных чисел; в) количество отрицательных чисел.
Знаешь ответ?
Чтобы оставить ответ, войдите или зарегистрируйтесь.
Ответ или решение 1
Елфрида
Var n , k 1 , k 2 , k 3 , p , i : integer ; begin ; writeln ( ' Type N : ' ) ; readln( n ) ; for i : = 1 to n do begin ; readln ( p ) ; if p = 0 then inc ( k 1 ) ; if p > 0 then inc ( k 2 ) ; if p < 0 then inc ( k 3 ); end ; writeln ( ' 0 : ' , k 1); writeln ( ' + : ' , k 2 ) ; writeln ( ' - : ' , k 3 ) ; end.
Новые вопросы в разделе Информатика
Адинела
05.10.2022, 08:15
Гаязутдин
05.10.2022, 01:10
Алайбек
05.10.2022, 01:05
Акияма
05.10.2022, 01:00