Есть ответ 👍

Знайти добуток чисел вiд 1 до P, кратне 3. Число P вводиться з клавиатуры.

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

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


Program z; var i,s,k: integer; begin s: =0; k: =0; for i: =-30 to 30 do if i mod 3=0 then begin s: =s+i; k: =k+1; end; write(s,' ',k); end. а тебе -30 и 30 включительно?

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