Срочно! Задача должна быть решена на языке програмирования турбо паскаля! «Найти…

Question

52

Срочно! Задача должна быть решена на языке програмирования турбо паскаля! «Найти сумму всех четных чисел из промежутка от A доB! "

в избранное ссылка

Знаете ответ?

seejey · Accepted Answer

97

seejey

19 апреля 2023

var i,s,a,b: integer; BEGIN read (a,b); s: =0; for i: =a to b do if i mod 2=0 then s: =s+i; writeln (s); END.

комментировать

в избранное ссылка отблагодарить