пустяки, дело-то житейское!
эта известная фраза Карлсона)
Var alfa, a1, c, a, g, m, cs : real;
begin
alfa:=30;
c:=13;
a:=-18;
g:=4+(c-a)*(c-a);
a1:=3.14*alfa/180;
cs:=cos(a1-a1*a1);
m:=9.8*(c-a)*(a-c)*cs*cs;
writeln('g = ',g,' m = ',m);
end.
Результат:
g = 965 m = -8843.80431485503
не понимаю что значит "четность тела". скорее всего вы имели ввиду четность числа. вот прога:
var a: integer;
begin
read(a);
if a mod 2=0 then write('четно')
else write('не четно');
end.
Uses crt;
var a:integer;
begin
a:=10000;
repeat
if (a mod 133=125) and (a mod 134=111) then writeln(a);
a:=a+1;
until a>99999;
end.
Ну, они тесно связаны, однако отличия есть. Компьютерная безопасность подразумевает защиту данных и информации отдельно взятого персонального компьютера, а кибербезопасность по сути тоже самое, только в этом случае, компьютер будет являться частью другой инфо-системы и в результате потери данных, другие киберобъекты также могут подвергнуться атаке и рискуют быть под угрозой.
Кибербезопасность более глобальный термин.