Program z;{a1=6,d=}const n=7;var a:array[1..n] of real;a1,i:integer;d:real;begina1:=6;d:=(49-6)/7;for i:=1 to n do begina[i]:=a1+(i-1)*d;writeln(a[i]:3);end;
end.
Program z4;
var s,l:integer; {объявляем переменные}
begin
s:=0; {начальное значение}
l:=0; {начальное значение}
while l<3 do {пока l<3 выполняем..}
begin {начало цикла}
l:=l+1; {увеличиваем l}
s:=s+l*l; {вычисляем текущее значение s}
end; {конец цикла}
writeln('s = ',s); {выводим s}
end.
Ответ:1 (<span>каталог файлов, хранимых на диске).</span>
Ну, они тесно связаны, однако отличия есть. Компьютерная безопасность подразумевает защиту данных и информации отдельно взятого персонального компьютера, а кибербезопасность по сути тоже самое, только в этом случае, компьютер будет являться частью другой инфо-системы и в результате потери данных, другие киберобъекты также могут подвергнуться атаке и рискуют быть под угрозой.
Кибербезопасность более глобальный термин.
Const
A = 10;
d = 2;
Var k : integer;
Function Detali(dd,kk : Integer) : Integer;
Begin
If kk>0 then Detali:=dd+Detali(dd+d,kk-1) else Detali:=0;
end;
Begin
Readln(k);
Writeln(Detali(A,k));
end.