1. Отметьте служебные слова, используемые при записи циклов на языке Паскаль. Until, integer, then, else, to, do, for, while, program, var, if, repeat 2. Подчеркните высказывания, которые являются верными для языка программирования Паскаль. -Тело цикла с оператором while из более чем одной команды необходимо записывать в составном операторе. -Параметр цикла в операторе repeat после каждого выполнения тела цикла увеличивается на единицу. -Параметр цикла с оператором for должен быть величиной целого типа. -Тело цикла с оператором for всегда будет выполняться как минимум один раз. -Цикл с оператором while выполняется, пока ложно условие цикла. -Цикл с оператором repeat выполняется, пока ложно условие цикла

Var 
a: array[1..n] of integer; 
k, i, m: byte; 
min: integer;

begin 
Write('Razmer massiva: '); 
Readln(k); 
if (k < 0) or (k > 100) then     
begin       
Writeln('Razmer dolzhen byt bolshe 0 i menshe 100');       
Readln;       
Exit;     
end; 
Randomize; 
Writeln('Ishodn. massiv: '); 
for i:=1 to k do     
begin       
a[i]:=Random(101)-50;       
write(a[i]:4);     
end; 
min:=a[1]; 
for i:=2 to k do   
if a[i] < min then       
begin         
min:=a[i];         
m:=i;       
end; 
a[m] := a[1]; 
a[1] := min; 
Writeln; 
Writeln('Min element = ', min:4, ' v posicii ', m:3); 
Writeln('Rezult. massiv: '); 
for i:=1 to k do     
write(a[i]:4); 
readln;
end.

1) Среди москвичей 9 мужчин + Всего иногородних мужчин 18 ⇒ 27 мужчин, 15 женщин

2) Всего иногородних мужчин 18.Из них-13 НЕ артисты ⇒ 5 артистов-иногородних мужчин

3) Среди пассажиров,не являющихся артистами,16 мужчин и 11 женщин + но ни одна из иногородних женщин не является артисткой

+ 15 женщин всего ⇒ 4 актрисы-женщины (все москвички), 11 мужчин-артистов

4) из 2) + 11 мужчин-артистов ⇒ 6 артистов-мужчин из Москвы, 3 мужчин из Москвы - НЕартисты

5) 27 мужчин, 15 женщин; из них москвичей - 9 мужчин, 4 женщины

6) 6 москвичей - НЕартисты,  3 мужчин-москвичей - НЕартисты ⇒ 3 женщины-москвички - НЕартисты

7) 4 актрисы-женщины (все москвички) + 3 женщины-москвички - НЕартисты ⇒ 7 женщин-москвичек

окончательно:

27 мужчин, 15 женщин, из них из Москвы - 9 мужчин и 7 женщин

15 артистов  - 4 женщины (все иногородние) и 11 мужчин (6 - из Москвы)