Разметка страницы ---> цвет страницы , это фон листа.
следующие , что ? Буквы ? Если буквы то там , буква "А" , тыкаешь и выбераешь.
Var n:integer;
begin
readln(n);
var ar:=readarrinteger(n);
for var i:=0 to n-1 do if (ar[i]<=437)
then begin write('Crash ',i+1); exit; end;
write('No crash');
end.
Program xxx;
uses CRT;
var
a, i:integer;
begin
readln(a);
while (a<>0) do
begin
write(a mod 10);
a := a div 10;
end;
<span>end.</span>
Program chik2;
var a,i,h,l:integer;
begin
l:=0;
h:=0;
for i:=1 to 10 do
begin
read(a);
if(a>0)then l:=l+1;
if(a<0)then h:=h+1;
end;
write(l,' ',h);
end.
l-кол-во полож
h-кол-во отрицательных