Помогите пожалуйста!!! Конструктор алгоритмов . Найти сумму целых положительных чисел: больших 20, меньших 100, кратных 3 и заканчивающихся на 2/4/8.
Заранее спасибо
Приложения:
![](https://st.uroker.com/files/302/302924db2fdcb8c9a0d0abd4ebe866f1.png)
HackerXX:
На каком языке?
Ответы
Ответ дал:
0
Ответ:
var n,sum:integer;
begin
for n:=20 to 100 do begin
if(n mod 3 = 0)and((n mod 10 = 2)or
(n mod 10 = 4)or
(n mod 10 = 8))then sum:= sum + n;
end;
write(sum);
end.
Вас заинтересует
4 месяца назад
11 месяцев назад
11 месяцев назад
2 года назад