program ArrayPrintBack;
var
a: array[1..8] of integer;
i: integer;
begin
Randomize;
for i := 1 to 8 do
begin
a[i] := 5 + Random(49);
Write(a[i]:3)
end;
Writeln;
for i := 8 downto 1 do
Write(a[i]:3)
end.
Информация (от <u />лат. informatio — «разъяснение, изложение, осведомлённость») — сведения о чём-либо, независимо от формы их представления.
Информатика (от <u />информация и <u />автоматика) — <u />наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации, обеспечивающих возможность её использования для принятия решений.
Компьютер (англ. computer, МФА: — «вычислитель») — устройство или система, способное выполнять заданную, чётко определённую последовательность операций.
Текстовый редактор — самостоятельная <u />компьютерная программа или компонент программного комплекса (например, <u />редактор исходного код<u />а интергрированной среды разработки или окно ввода в браузере), предназначенная для создания и изменения <u />текстовых данных вообще и <u />текстовых файлов в частности.
Графический редактор<span> — <u />программа</span><span> (или пакет программ), позволяющая создавать и редактировать двумерные изображения с помощью <u />компьютера.</span>
Var
a, b: integer;
Begin
Writeln('Введите 2 числа');
Read(a,b);
if (a*b mod 3 = 0) then Writeln('Произведение чисел ', a, ' и ', b, ' делится нацело на 3')
else Writeln('Произведение чисел ', a, ' и ', b, ' нацело на 3 не делится');
end.
Var n,k,i:integer;
y:longint;
begin
readln(n);
k:=1;
y:=1;
for i:=1 to n+1 do begin
y:=y*k;
k:=k+2;
end;
writeln(y);
end.
Число различных ключей шифра "поворотная решетка" при четных значениях n равно 4<span>n2/4</span><span>.</span>