1-2
2-1
3-5
4-3
5-4
Цифры по порядку вместе с масками
Компьютер нужен для получения информации.Так же для выполнения различных операций.Компьютер нужен для отправки разных файлов из одного компьютера на другой.
4 - 0000 0100
8 - 0000 1000
6022002 - EB3C
Program fantscrin;
Var a: array [1..1000] of integer;
i,k,n:integer;
Begin
write('К = '); readln(k);
write('N = '); readln(n);
for i:=1 to n do
a[i]:=random(k*2)-k;
for i:=1 to n do
write(a[i], ' ');
End.
Uses crt;
var k,q,i:integer;
begin
readln(q);
k:=0;
repeat
read(i);
if (i<30000) and (i mod 10=8) then inc(k);
q:=q-1;
until q=0;
writeln;
writeln(k);
<span>end.</span>