Напишите программу через for, . найти в дипазоне [40; 70] сумму чисел, которые делятся на 5 с остатком 1

вообшетоямаг вообшетоямаг    2   23.09.2019 08:40    7

Ответы
Sofa22Bas Sofa22Bas  01.09.2020 22:21
Program qq;var a,b,sum:integer;BEGINsum:=0;for a:=40 to 70 do beginif a mod 5=1 then sum:=sum+a;end;writeln(sum);END.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика