Склавиатуры вводятся числа пока их сумма меньше 300. - вопрос №375876300 от anjaps 14.10.2022 01:58

Question

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

anjaps · 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....