1) Открыть диск D
2) Нажать Правой кнопкой мыши (ПКМ) на поле, в контекстном меню выбрать: Создать - Новая папка.
Будет создана папка под названием "Новая папка".
3) Нажать левой кнопкой мыши (ЛКМ) 1 раз на названии. Название станет доступно для редактирования. Поменять его на "Pentium I".
4) Нажать двойным кликом ЛКМ на папке, она откроется.
Повторить пункты 2 и 3. Новую папку в папке "Pentium I" назвать "Pentium II".
5) Повторить пункт 4. Новую папку в папке "Pentium II" назвать
"Pentium III".
Всё.
Program n1;
const n=13;
var a: array[1..n] of real;
i: integer;
p: real;
begin
p:=1;
for i:=1 to n do
begin
readln(a[i]);
p:=p*a[i];
end;
writeln('массив:');
for i:=1 to n do write(a[i],' ');
writeln;
writeln('произведение: ',p);
end.
1. Заливка.
2. Геометрические фигуры.
3. Текст.
Модель - продолжение данного выражения