Var i,sum:integer; a:array[1..10] of integer;
begin;
for i:=1 to 10 do readln(a[i]); next i;
sum:=0;
for i:=1 to 10 do sum:=sum+a[i]; next i;
writeln('Сумма элементов = ',sum);
end.
Мен азанда жаттығу жасаймын .Мен ыдыс жуамың.Мен мектеп ке барғанды жақсы көремін. Мен анама, әкеме және әжеме көмектескенді жақсы көремін.
Будет пасмурно, так как во всех условиях стоит пункт "если будет пасмурно".
1. ноги - убрать.
2. пищи - убрать.
3. месяце - убрать.
4. ледяной - убрать.
5. мою - убрать.
6. оранжевыми - убрать.
7. и развалины - убрать.
8. военным - убрать.
9. холодное - убрать.
10. поведения - убрать.