Есть ответ 👍

Построить логическую схему по логической формуле: (A∧B)V AVB.

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

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


Pascalabc.net var a,b,s: integer; begin a: =1; while a< > 0 do begin read(a); if a > 0 then begin s+=a; b+=1; end; end; writeln('сумма чисел: '+s); writeln('среднее арифметическое: '+s/b); end.

Популярно: Информатика