1. Делаешь саму презентацию
2. Затем разделяешь ее на части
3. Придумай себе вступление. Для твоей темы будет актуально что-то вроде этого: "Существует 193 страны ( гос-ва ) во всем мире. Сегодня я расскажу о некоторых из вас."
При рассказе самой презентации рекомендую делать паузы и упоминать о традициях и\или праздниках той или иной державы
Используя закон склеивания получаем (AvC)^(Av-C)^(-BvC) = A^(-BvC)
P.S. (AvC)^(Av-C)=A
А массив тут и не нужен. Накапливаем сумму и подсчитываем количество введенных чисел. Их этих двух величин получаем среднее.
var
m,n,s:integer;
begin
s:=0; n:=0;
repeat
Read(m);
if m<>0 then begin s:=s+m; n:=n+1 end
until m=0;
if n>0 then Writeln(s/n)
else Writeln('Ничего не введено')
end.
Если масив заполнить нужно рандомно:
program wk;
var i,s:integer;mas:array [1..10] of integer;
begin
s:=0;
for i:=1 to 10 do
begin
mas[i]:=random(21)-20;
if mas[i] mod 2=0 then s:=s+mas[i];
end;
writeln('S=',s)
end.
Если масив заполняется с клавиатуры:
program wk;
var i,s:integer;mas:array [1..10] of integer;
begin
s:=0;
for i:=1 to 10 do
begin
readln(mas[i]);
if (mas[i] mod 2)=0 then s:=s+mas[i];
end;
writeln('S=',s)
end.
По оси x: 0+(-2)+4=2, так как повторить 5 раз, то 2*5=10
по оси y: 1+3+(-5)=-1, так как повторить 5 раз, то -1*5=-5
в точку (10, -5) Чертежник попал бы, если бы начинал движение с точки (0,0)
а так как он начинал с точки (3,1),то
по оси х: 10+3=13
по оси y: -5+1=-4
(13, -4)
ответ: 3
