Составить прогамму, нахождения суммы всех натуральных чисел из диапазона от А до В , включая А и В , кратных 5 (А и В вводятся с клавиатуры)
Ответы
Ответ дал:
0
program raf105;
var a,b,c,i:integer;
begin
write('Введите 2 числа A и B: ');
readln(a,b);
for i:=a to b do
if (i mod 5)=0
then c:= c+i;
writeln('Сумма всех чисел кратных пяти в диапазоне от ',a,' до ',b,' равна ',c);
end.
Язык программирования PascalABC
Ответ дал:
0
помогите мне тоже, пожалуйста
Вас заинтересует
1 год назад
1 год назад
2 года назад
7 лет назад
8 лет назад