Найти сумму натуральных трехзначных чисел, каждое из которых при делении на 7 дает в остатке 3. (с использованием цикла, на языке pascal)

LuLu6780 LuLu6780    3   20.09.2019 14:40    5

Ответы
Kikimora16 Kikimora16  08.10.2020 04:50
Uses crt;
var number:integer;
begin       
         number := 0;          
         for var i := 100 to 999 do         
         if(i mod 7 = 3) then             
              number := number + i;         
         writeln('Сумма: ', number);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика