PROGRAM7496.BAS

{* Вычисления *}

{ Выберите программу или раздел при помощи графического манипулятора «Мышь» ! }
Case User Of
  •  'Задача295' : Uses zadach295.pas; { Определить в qbasic есть ли в заданном четырехзначном числе а цифры 5 и 8 ... }
  •  'Задачи' : Uses .pas; { Задача3 ...
    Задача1 ...
    Задача2 ...
    Задача4 ...
    Задача 5 ...
    Задача6 ...
    Задача7 ...
    Задача8 ...
    Задача9 ...
    }
  •  'Математика' : Uses .pas; { Соприкасающиеся окружности ...
    Построение графика ...
    Площадь треугольника по формуле Герона ...
    Площадь прямоугольника по его сторонам ...
    Длина окружности и площадь круга ...
    Факториал числа ...
    Сумма цифр в числе ...
    Таблица умножения ...
    Задача266 ...
    }
  •  'Преобразования' : Uses .pas; { Перевод чисел из десятичной системы ...
    Округление чисел с заданной точностью. ...
    Перевод градусной меры в радианную. ...
    Перевод радианной меры в градусную. ...
    }
Else
 writeln('Ничего не выбрано!');
End;
REM basic