Склавиатуры вводятся числа пока их сумма меньше - вопрос №375876300 от Dinara55 18.11.2022 16:56

Question

Информатика: Склавиатуры вводятся числа пока их сумма меньше 300. найти произведение отрицательных чисел делящихся на 3

Dinara55 · Answer

var x,s,p:integer;beginp:=1;while s 300 do beginreadln(x);if x mod 3=0 then p:=p*x;s:=s+x;end;if p 1 then writeln(p) else writeln( 0 );end....