Пусть 30 чисел водятся по одному. Определить что больше, количество положительных или количество отрицательных чисел. На Паскале
Пусть 30 чисел водятся по одному. Определить что больше, количество положительных или количество отрицательных чисел. На Паскале
Ответ(ы) на вопрос:
begin pol:=0; otr:=0; for i:=1 to n do begin readln (a[i]); if a[i]>0 then pol:=pol+1; if a[i]<0 then otr:=otr+1 end; if pol
Не нашли ответ?
Похожие вопросы