1.Название клавиши переключения регистров клавиатуры?-Shift.
2.Н<span>азвание клавиши расположенной рядом с Pause?-</span>Scroll Lock.
Program pascal;
var s:string; n,i:integer;
begin
writeln('Daite frazu '); readln(s);
writeln('Daite N'); readln(n);
for i:=1 to n do writeln(s);
readln;
end.
this program will show any phrase you will indicate for N times you want
Работа учащегося с объектом
Program n1;
var
i,n,x:integer;
begin
n:=0;
for i:=1 to 9 do begin
writeln('Введите число'); readln(x);
if x>n then n:=x;
end;
writeln(n);
<span>end.
</span>program n1;
var
i,n,x:integer;
begin
n:=32767;
for i:=1 to 9 do begin
writeln('Введите число'); readln(x);
if (x<n) and (x mod 2=0) then n:=x;
end;
writeln(n);
end.<span>
</span>