...............ПЛИЗ.................Что вычисляет приведённая ниже программа? Program example; Var x,y,z,I :integer; Begin ReadLn(a,b,c); i:=0; If a больше 0 then i:=i+1; If b больше 0 then i:=i+1; If c больше 0 then ...
...............ПЛИЗ.................
Что вычисляет приведённая ниже программа? Program example; Var x,y,z,I :integer; Begin ReadLn(a,b,c); i:=0; If a>0 then i:=i+1; If b>0 then i:=i+1; If c>0 then i:=i+1; WriteLn(i) End.
Ответ(ы) на вопрос:
Вычисляет количество положительных чисел
Не нашли ответ?
Похожие вопросы