Помогите срочно!!!!!!!!!Даю 50 баллов
Написать программу, которая найдет сумму чисел, кратных 5 на интервале от 8 до 80. Паскаль
Ответы
Ответ дал:
1
Program kratnii;
var a, i: integer;
begin
for i := 8 to 80 do
if (i mod 5 = 0) then
a := a + i;
Writeln(a);
end.
rap1dity:
там установщик
Ответ дал:
0
## (8..80).Where(Число -> Число.Divs(5)).Sum.Print
Приложения:
Вас заинтересует
1 год назад
1 год назад
1 год назад
6 лет назад
8 лет назад
8 лет назад