Ответ:
В большинстве случаев доклады и их планы в презентациях не используются.
Чаще всего на них показывают наглядные графики и 2-3 предложения к ним.
Я считаю, что вариант 4 будет правильным.
Program zad1;
const N = 6;
var a: array[1..N] of integer;
i: byte;
b: integer;
begin
for i:=1 to N do
read(a[i]);
for i:=1 to N div 2 do
begin b := a[i];
a[i] := a[N-i+1];
a[N-i+1] := b;
end;
for i:=1 to N do
write(a[i],' ');
writeln;
end.
Uses crt;
var summa, raz,st,storona1,storona2:real;
begin
ClrScr;
writeln("Введите сумму двух чисел");
readln(summa);
writeln("Введите во сколько раз одно больше другого");
readln(raz);
st:=summa/(raz+1);
storona1:=st;
storona2:=st*raz;
write("1 число-", storona1:7:2,"ед.");
1. <span>Полносвязная топология
2. Топология "Шина" (квадраты на концах - терминаторы)
3. Топология "Звезда" (В цетре - </span><span>концентратор или хаб</span>)
4. Топология "Кольцо" (Стрелкой указано направление токена)
Теории в интернете полно.
3) 3 раза
4) 5
5) until n>6
6)program zadanie;
uses crt;
Var
n,k,i,S: integer;
begin
clrscr;
writeln ('Введите n=');
readln (n);
for i:=1 to n do
begin
S:=S+i*i;
end;
writeln('Сумма квадратов=',S);
end.
7)program zadanie2;
uses crt;
Var
n: integer;
begin
clrscr;
writeln ('Введите n=');
readln (n);
writeln('Результат:',(5+(n-1))*n);
<span>end.</span>