Вот программа на C, выводит массив в прямом и обратном порядке:
#include <stdio.h>
#include <time.h>
void func(int *array, int n, int i)
{
if (i < n) {
array[i] = 0 + rand() % 100;
printf("%d ", array[i]);
func(array, n, i + 1);
printf("%d ", array[i]);
}
else {
printf("\n");
}
}
int main(int argc, char *argv)
{
srand(time(NULL));
int array[10];
func(array, 10, 0);
return 0;
}
program allliyagilmanova666;
const n = -20;
m = 0;
l = 10;
var x, y: double;
proverka: byte;
begin
proverka := 1;
repeat
writeln('Введите х:');
readln(x);
if (x < -20) then y := 2 * x + 1
else if ((x >= n) and (x <= m)) then y := 4 * x + 8
else if ((x > m) and (x < l)) then y := 0
else y := sqr(x) + 2;
writeln('При х = ', x : 0 : 2, ' y = ', y : 0 : 2);
writeln('Если хотите продолжить работу введите 1, в противном случае - 0.');
readln(proverka);
until (proverka = 0);
end.
Информационная безопасность – это защищенность информации и поддерживающей инфраструктуры от случайных или преднамеренных воздействий естественного или искусственного характера, чреватых нанесением ущерба владельцам или пользователям информации, а также прав и интересов человека и гражданина, общества и государства в информационной сфере от реальных и потенциальных угроз, при котором обеспечивается устойчивое развитие и информационная независимость. Под обеспечением информационной безопасности или защитой информации понимается сохранение ее конфиденциальности, целостности и доступности. Информационная безопасность достигается посредством реализации соответствующего набора мер контроля, включая политики, процедуры, процессы, организационные структуры и функции программного и аппаратного обеспечения. Политика информационной безопасности (далее — Политика) – комплекс превентивных мер по защите информации, в том числе информации с ограниченным распространением (служебная информация), информационных процессов и включает в себя требования в адрес пользователей информационных систем Министерства энергетики Республики Казахстан, его ведомств и подведомственных организаций в своей деятельности. .
Объяснение:
Program Massiv2;
Uses Crt;
var a:array[1..10] of integer;
i:integer;
begin
clrscr;
randomize;
for i:=1 to 10 do a[i]:=random(100)+1;
write('Массив в обратном порядке: ');
for i:=10 downto 1 do write(a[i],' ');
readkey;
end.