1) Нужно нажать левой кнопкой мыши на стрелку под кнопкой "Выделить"
2) Выбрать прямоугольную или произвольную область.
Если выбрана прямоугольная область:
1) Нажать левой кнопкой мыши в том месте, где должен быть какой-либо угол прямоугольной области;
2) Не отпуская кнопку мыши, перевести мышь в то место, где должен быть противоположный угол;
3) Отпустить кнопку мыши.
Если выбрана произвольная область:
1) Нажать левой кнопкой мыши в том месте, где должно быть какое-либо место на границе произвольной области;
2) Не отпуская кнопку мыши, провести ей по границе произвольной области и замкнуть эту границу;
3) Отпустить кнопку мыши.
3) Нажать правой кнопкой мыши по выделенной области;
4) Выбрать "Копировать";
5) Нажать на любое место, кроме выделенной области правой кнопкой мыши;
6) Выбрать "Вставить".
1. а)
var a, i: integer;
begin
a:=9;
for i:=0 to 9 do begin
writeln (a*i);
end;
end.
1. б)
var a, i: integer;
begin
a:=2;
for i:=0 to 9 do begin
writeln (a*i);
end;
end.
2. (тут только вывод чисел от 1 до 10)
var i:integer;
begin
for i:=1 to 10 do begin
writeln (i);
end;
end.
3.
var i, a:integer;
begin
for i:=3 to 15 do begin
a:=i*2;
writeln (i, ' соответствующее число = ' a);
end;
end.
Объяснение: