1. Направляет запрос на сервер.
4. Выводит данные на экран.
5. Составляет отчет для вывода на печать.
Ответ: 1, 4, 5.
1 - а2 - а3 - а4 - б дальше хз
Это будет 2 в 20й степени бит, то есть 1024 кбита.
var x,n:integer;
begin
readln(n);
readln(x);
for i=:1 to n do
x:= (x-i);
end.
Если решение задачи будет не верно, извените значит надо писать более подробно.
const
n=15;
var
a:array [1..n] of integer;
i,min:integer;
begin
randomize;
for i:=1 to n do begin
a[i]:=random(104)-37;
write (a[i],' ');
end;
writeln;
min:=a[1];
for i:=2 to n do
if (odd(a[i])=true) and (a[i]<min) then min:=a[i];
writeln (min);
readln;
end.