Файл - он один, а файловая система - это несколько файлов.
1. Выбор участка.
2. Выбор проекта.
3. Получение необходимых разрешений.
4. Выбор материалов.
5. Решение вопросов финансирования строительства.
6. Собственно, проектирование
7. Подготовка участка к
строительству.
8. Поиск исполнителей.
9. Нулевой цикл.
10. Заготовка лесоматериалов.
11. Подготовка строительных материалов из леса и завоз на участок.
12. Сборка стен.
13. Установка кровли.
14. Подвод коммуникаций.
15. Внутренняя отделка.
//PascalABC.Net 3.1.0.1200
var
x0, xk, dx, x: real;
function f(x: real): real;
begin
f := x * x * x + 3;
end;
begin
write('Введите промежуток и шаг ([a,b] h) ');
readln(x0, xk, dx);
x := x0;
writeln(' x ':10, ' | ', ' f(x) ':10);
repeat
writeln(x:10:3, ' | ', f(x):10:3);
x := x + dx;
until x > xk;
end.
1)
program test;
var number: integer;
begin
write('Enter the number: ');
readln(number);
number:=abs(number)-2;
writeln(number);
readln;
end.
2)
program test;
var number, temp: integer;
begin
write('Enter the number: ');
readln(number);
temp:=number mod 10;
writeln(temp, '^2=', temp*temp);
readln;
end.