for i: =1 to 40 do if mas[i]< =10 then sum: =sum+mas[i];
writeln ('сумма равна ', sum);
readln;
end.
программу проверил все работает
Ответ дал: Гость
в 4-м тыс. до н. э. из многих небольших территориальных образований — номов — возникло два политических объединения — верхний египет и нижний египет (со столицами в иераконполе и буто). создание единого государства приписывают правителю верхнего египта менесу. столицей объединённого государства около 3000 г. до н. э. стал мемфис.
Популярные вопросы