С клавиатуры вводится 7 чисел программа; должна найти количество всех положительных чисел и посчитать суммы отрицательных
Предмет:
ИнформатикаАвтор:
luciapowersvar n,i,s,k:integer;Begin for i:=1 to 7 do Begin read(n); if n>0 then k:=k+1; if n<0 then s:=s+n; end; writeln(k,s);End.
Автор:
darienclementsДобавить свой ответ
1) Какие вещества называются предельными одноосновными карбоновыми кислотами? Какова их общая формула? 2)Какова классификация карбоновых кислот по количеству карбоксильных групп? Приведите формулы соответствующих веществ.
Предмет:
ХимияАвтор:
bubbles2nvlОтветов:
Смотреть
Напишите три числа, каждое из котрых меньше 4,73 и больше 4,71. Нужно написать двойным неравенством.
Предмет:
МатематикаАвтор:
selenekfr7Ответов:
Смотреть
помогите написать сочинение про свою реку,если сможете то можно на татарском
Предмет:
Другие предметыАвтор:
copperqidsОтветов:
Смотреть
Решите уравнения:
6 400:(x:6)=400 15*(840:x)=900
Предмет:
МатематикаАвтор:
novakОтветов:
Смотреть