Создайте программный код, который позволяет вводить и складывать числа a и b. Например: а = 4
б = 3. Вам нужно написать код, который складывает два числа

229

Посмотреть ответы 1

Ответы на вопрос:

Alina9392010

Информатика

4,6(97 оценок)

Var a,s,s2: real; k,n,i: integer; begin readln(n); for i: =1 to n do begin readln(a); if a=0 then k: =k+1; if a> 0 then s: =s+a; if a< 0 then s2: =s2+a; end; if k=0 then writeln('нет 0') else writeln('k= ',k); if s=0 then writeln('нет полож') else writeln('s= ',s); if s2=0 then writeln('нет отриц') else writeln('s < 0 = ',s2); end.