Напишите пожалуйста программу с помщью Паскаля:Дана последовательность 5 9 13 17 21 25 29 33 37 41 45 49. Составьте программу для подсчета числа слагаемых сумма которых равна 324
Напишите пожалуйста программу с помщью Паскаля:Дана последовательность 5 9 13 17 21 25 29 33 37 41 45 49. Составьте программу для подсчета числа слагаемых сумма которых равна 324
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var sum, i: integer;
begin
sum := 5; i := 1;
while (sum < 324) do
begin
sum := sum + 4;
i := i + 1;
end;
writeln ('Слогаемых: ');
write (i);
end.