ПЕРЕПИСАТЬ КОД С ЯЗЫКА PASCAL в C++ 1:
var k,n,i,sum:integer;
s,t:string;
begin
s := '';
sum:=0;
write('Введите количество пассажиров: '); readln(n);
for i:=1 to n do begin
k:=random(-140)+150;
str(k,t);
s:=s+t+' ';
sum:=sum+k;
end;
if (sum>=20) and (sum<=750) then write('OK : ',s)
else if sum < 20 then write('Недогруз: ',s)
else write('Перегруз: ',s);
end.
2.
var k,n,i,sum:integer;
begin
i:=1;
sum:=0;
write('Введите количество чисел: '); readln(n);
while i <= n do begin
write('Введите ',i,'-е число: '); readln(k);
if k > 1000 then writeln('Число не должно превышать 1000!')
else begin
if (k div 10 <> 0) and (k div 100 = 0) then begin
sum:=sum + (k div 10);
end;
inc(i);
end;
end;
write(sum);
end.
3.
var k,n:integer;
begin
write('Введите количество метров: '); readln(k);
write('Введите количество недель: '); readln(n);
write(((n*7) div 5) * 50 + k);
end.
Басқа тілде оқу
Download PDF
Бақылау
Өңдеу
Ақпараттық қауіпсіздік — мемлекеттік ақпараттық ресурстардың, сондай-ақ ақпарат саласында жеке адамның құқықтары мен қоғам мүдделері қорғалуының жай-күйі.
Ақпаратты қорғауӨңдеу
Ақпаратты қорғау — ақпараттық қауіпсіздікті қамтамасыз етуге бағытталған шаралар кешені. Тәжірибе жүзінде ақпаратты қорғау деп деректерді енгізу, сақтау, өңдеу және тасымалдау үшін қолданылатын ақпарат пен қорлардың тұтастығын, қол жеткізулік оңтайлығын және керек болса, жасырындылығын қолдауды түсінеді. Сонымен, ақпаратты қорғау - ақпараттың сыртқа кетуінің, оны ұрлаудың, жоғалтудың, рұқсатсыз жоюдың, өзгертудің, маңызына тимей түрлендірудің, рұқсатсыз көшірмесін жасаудың, бұғаттаудың алдын алу үшін жүргізілетін шаралар кешені