program massiv ;
uses crt;
type mas=array[1..1000] of integer;
var i,n,s: integer;
m:mas;
begin writeln ('введи число') ;
readln (n);
randomize;
for i:=1 to n do
begin
m[i]:=random(45)+1;
write(m[i], ' ');
if m[i] mod 2=0 then s:=s+1; или inc(s,1)
end;
writeln;
write(s );
end.
Коллаборационизм – это широкий спектр действий, и всем им невозможно дать единую оценку. Работа в качестве учителей, актёров и др. на оккупированной территории вряд ли вообще нуждается в оправдании. Работу в местной полиции во многих случаях можно оправдать, потому что эта работа предполагала обычное поддержание правопорядка (обычные уголовные преступления во время войны никто не отменял). Также были коллаборационисты, напрямую виновные в уничтожении коммунистов, но часто это была личная месть за обиды 30-х годов (раскулачивание и т. п.), и лишь тех, кто участвовал в массовом терроре нельзя оправдать никакими их мотивами. Таких, к сожалению, было не мало.
Главной целью древнегреческого воспитания было формирование из человека гражданина, который был способен принести пользу себе и согражданам, был прекрасен телом и добр душой.
Для достижения цели до семи лет мальчиков и девочек воспитывала мать на женской половине дома. Позже в школе мальчиков учили писать, читать, петь, играть на лире и флейте, слагать стихи и составлять речи, считать и решать задачки. В двенадцать лет мальчики поступали в школу-палестру. Здесь их учили бегать, прыгать, метать копьё, бороться. Достигнув восемнадцати лет, юноши два года проводили в военных лагерях на границах полиса. Здесь они обучались ходить в фаланге плечом к плечу, дружно бежать на врага, опрокидывая его ударом копий, отражать удары щитом, разить соперника мечом.
Взрослые юноши и мужчины посещали школы-гимнасии, где тренировали тело в атлетических упражнениях, а после в прохладных бассейнах или за пиршественным столом общались с видными политиками и ораторами полиса.
Таким образом, в Древней Греции сложилась своя система воспитания, основанная на соревновании и конкуренции, направленная на формирование личности сильной и красивой умом и телом. Все эти граждане должны были защищать и прославлять свой полис.
uses crt;
type mas=array[1..1000] of integer;
var i,n,s: integer;
m:mas;
begin writeln ('введи число') ;
readln (n);
randomize;
for i:=1 to n do
begin
m[i]:=random(45)+1;
write(m[i], ' ');
if m[i] mod 2=0 then s:=s+1; или inc(s,1)
end;
writeln;
write(s );
end.