Ответы
Ответ дал:
2
program sum_of_10_numbers;
var
i, sum: integer;
num: array[1..10] of integer;
begin
sum := 0;
for i := 1 to 10 do
begin
writeln('Enter number ', i, ': ');
readln(num[i]);
sum := sum + num[i];
end;
writeln('The sum of the 10 numbers is: ', sum);
readln;
end.
Вас заинтересует
3 месяца назад
3 месяца назад
3 месяца назад
3 месяца назад
1 год назад
7 лет назад