Напишите фрагмент програмы (паскаль) для решения - вопрос №2735583 от tatanavolosnova1 03.07.2020 01:58

Question

Информатика: Напишите фрагмент програмы (паскаль) для решения : вычислить сумму чисел от 3 до 9, кратных 4. у меня получается сделать только какие числа принадлежат промежутку, а сумму не могу

tatanavolosnova1 · Answer

Фигня!

var

begin

for i := 3 to 9 do

begin

if (i mod 4 = 0) then

begin

s := s + i;

end;

writeln('сумма равна ',s);

end.

Если что-то непонятно пиши в вк /pifi_fc