Var a,b:integer;
begin;
readln(a);
readln(b);
if a>b then write('Первое');
if a<b then write('Второе');
if a=b then write('=');
<span>end.</span>
Контроллеры есть чипы, в которых прописано определённое ПО. Контроллеры нужны для выполнения определённых задач, например для питания видеокарты, или контроллер звука. Очень много примеров. Драйвера это приложение к основной ОС, которое служит для того чтоб функционировали разные устройства, чтоб можно было сдружить ПК и мышь.
const
s: array [1..6] of char= ('б','в','г','д','ж','з');
d: array [1..6] of char= ('п','ф','к','т','ш','с');
var
c: string;
i,j: integer;
begin
readln(c);
for i:= 1 to length(c) do
for j:= 1 to 6 do
if d[j]=c[i] then c[i]:= s[j]
else
if s[j]=c[i] then c[i]:= d[j];
writeln(c)
end.<span>
</span>
Program student;
var
ocenka:byte;
begin
writeln('vvedite ocenku');
readln(ocenka);
case ocenka of
1: writeln('ochen ploho!');
2: writeln('ploho');
3: writeln('udovletvoritelno');
4: writeln('horosho');
5: writeln('otlichno');
end;
end.