После первых побед государь Петр Романов заложил на берегах Невы крепость, которую и назвал Санкт-Петербургом, что означает “святого Петра крепость”. Только не подумайте, что царь назвал город в свою честь: город носит имя ангела-хранителя царя – святого апостола Петра. Знаете, почему он назвал город на европейский манер? Потому, что в отличие от древней Москвы, Петр решил заложить европейскую столицу России и самим названием подчеркнул, что этот город европейский.
В первую очередь на Заячьем острове была построена Петропавловская крепость. Дата её основания – 16 мая 1703 года – считается днем рождения города. Адмиралтейство – вторая крепость на берегах Невы. Перекрестный огонь пушек Петропавловской крепости и Адмиралтейства мог потопить любое вражеское судно, которое вознамерилось бы войти в Неву. Но очень скоро устье Невы было защищено морской крепостью – Кронштадтом. Со стены Петропавловской крепости бьет пушка. Пушка стреляла и при Петре – на вечерней и утренней заре, отмечая подъём и спуск флага. А ещё извещала людей о наводнении. А позднее – с середины века – ввели полуденный выстрел и узнавали по нему время.
В центре крепости стоит собор во имя святых апостолов Петра и Павла – усыпальница державных правителей России. Петропавловский собор увенчан высоким шпилем, на верхушке которого помещен флюгер в виде ангела. В 1722 году в Петербурге – напротив Летнего сада, на Фонтанке – заработала верфь, где начали строить суда для частных лиц. В дни праздников разрисовывали паруса, лодки красили в различные цвета и устраивали парад. А когда над Невой расцветали фейерверки – зрелище бывало просто сказочное
В первую очередь на Заячьем острове была построена Петропавловская крепость. Дата её основания – 16 мая 1703 года – считается днем рождения города. Адмиралтейство – вторая крепость на берегах Невы. Перекрестный огонь пушек Петропавловской крепости и Адмиралтейства мог потопить любое вражеское судно, которое вознамерилось бы войти в Неву. Но очень скоро устье Невы было защищено морской крепостью – Кронштадтом. Со стены Петропавловской крепости бьет пушка. Пушка стреляла и при Петре – на вечерней и утренней заре, отмечая подъём и спуск флага. А ещё извещала людей о наводнении. А позднее – с середины века – ввели полуденный выстрел и узнавали по нему время.
В центре крепости стоит собор во имя святых апостолов Петра и Павла – усыпальница державных правителей России. Петропавловский собор увенчан высоким шпилем, на верхушке которого помещен флюгер в виде ангела. В 1722 году в Петербурге – напротив Летнего сада, на Фонтанке – заработала верфь, где начали строить суда для частных лиц. В дни праздников разрисовывали паруса, лодки красили в различные цвета и устраивали парад. А когда над Невой расцветали фейерверки – зрелище бывало просто сказочное
Всё таки есть сомнение нужна сумма нечётных элементов массива или сумма элементов массива с нечётными индексами?
В данной прграмме подсчитывается сумма нечётных элементов массива
Если же нужно второе то строку отмеченную {*} следует заменить на
if (i mod 2)>0 then s:=s+a[i];
Program massiv;
Uses Crt;
var a:array[1..10] of integer;
i,sum,ch:integer;
begin
clrscr;
write('Введите число:' );
readln(ch);
write('Введите элементы массива:');
sum:=0;
for i:=1 to 10 do
begin
readln(a[i]);
if (a[i] mod 2)>0 then s:=s+a[i]; {*}
end;
writeln; write('Исходный массив: ');
for i:=1 to 10 do
begin
write(a[i]);
write(' ' );
end;
writeln; writeln;
write('Сумма нечётных элементов массива: ',sum)
writeln; writeln;
write('Номера элементов которые больше числа ',ch,' : ' );
for i:=1 to 10 do
if (a[i]>ch) then
begin
write(i:2);
write(' ' );
end;
writeln; writeln;
write('Положительные числа которые кратны числу ',ch,' : ' );
for i:=1 to 10 do
if (a[i]>0) and (a[i] mod ch=0) then
begin
write(a[i]);
write(' ' );
end;
readkey;
end.