Решение смотри во вложении.
Function avg( i,j,k,m: float ): float;
begin
result := (i+j+k+m) / 4.0;
end;
var
a : integer;
begin
readln (a);
if a > 0 then
a := a +1;
if a <0 then
a := a-2
if a= 0 then
a := 10;
writeln (a);
end.
Чтобы команда сработала, нужно её напечатать при помощи клавиатуры и нажать ENTER. В основном регистр не учитывается, то есть команды можно вводить как маленькими так и большими буквами. Имена файлов в DOS могут быть только в формате 8.3, то есть не более 8 символов в названии файла и не более 3 в расширении (исключая недопустимые символы — пробел . " / \ [ ] : ; = ,). Пробел используется в качестве разделителя между командой и её параметрами.
Далее
Комманда....Описание
dir....Просмотр каталога
md....Создание каталога
cd....Смена текущего каталога
rd....удаление каталога
deltree....Удаление каталога со всем его содержимым
move....переименовать каталог
path....поиск