PROGRAM7510.BAS

{* Задачи *}

{ Выберите программу или раздел при помощи графического манипулятора «Мышь» ! }
Case User Of
  •  'Задача12' : Uses zadach12.pas; { Вычислить: Значения исходных данных: а=0.7, b=0.05, x=0.5 ... }
  •  'Задача120' : Uses zadach120.pas; { Написать программу вычисления произведения 1*3*5…N ... }
  •  'Задача121' : Uses zadach121.pas; { Царевна – лягушка съедает ежедневно на 20 % комаров больше, чем в предыдущий день и еще 3 комара. Написать программу определяющую, сколько комаров она съест в 20-й день, ... }
  •  'Задача122' : Uses zadach122.pas; { Какова будет высота растения через 6 месяцев, если за 1 месяц прирост составляет 5%. Начальное значение 20 см. ... }
  •  'Задача123' : Uses zadach123.pas; { Каков будет рост ребенка за год, если за месяц он подрастает на 2%. Рост на начало года – 120 см. ... }
  •  'Задача124' : Uses zadach124.pas; { Мой богатый дедушка на день рождения дарил мне столько долларов, сколько лет мне исполнялось, а я их складывала в копилку. Сколько денег у меня будет на N день рождения? ... }
  •  'Задача125' : Uses zadach125.pas; { Одноклеточная амеба каждые 3 часа делится на 2 клетки. Определить сколько клеток будет через N суток (в сутках 24 часа) ... }
  •  'Задача126' : Uses zadach126.pas; { Начав тренировки, спортсмен в 1-й день пробежал 10км. Каждый следующий день он увеличивал дневную норму на 10% от нормы предыдущего дня. Какой суммарный путь пробежит спо ... }
  •  'Задача127' : Uses zadach127.pas; { Подсчитать факториал дня ... }
  •  'Задача128' : Uses zadach128.pas; { Для заданных значений аргумента вычислить значение функции. Результат вывести в виде таблицы. Y=cos x+18, 5 на отрезке П< = X <= 2П с шагом П/2 Y=(sin x +4)/ 12, 5, ... }
  •  'Задача129' : Uses zadach129.pas; { Дана десятичная дробь. Округлить её с точностью до двух знаков после запятой. ... }
  •  'Задача13' : Uses zadach13.pas; { Вычислить значение: приИсходные данные: b=2.5 Диапазон и шаг изменения аргумента: ... }
  •  'Задача130' : Uses zadach130.pas; { Вычислить значение функции ... }
  •  'Задача131' : Uses zadach131.pas; { Найти наибольшее и наименьшее из двух заданных чисел A и B. ... }
  •  'Задача132' : Uses zadach132.pas; { Решите уравнение если b¹0; c¹0. ... }
  •  'Задача133' : Uses zadach133.pas; { Составить программу реализующую Теорему Крамера. ... }
  •  'Задача134' : Uses zadach134.pas; { Найдите двузначное число, равное сумме цифры его десятков и квадрата цифры единиц ... }
  •  'Задача135' : Uses zadach135.pas; { Если к сумме цифр двузначного числа прибавить квадрат этой суммы, то снова получится это число. Найдите все такие числа ... }
  •  'Задача136' : Uses zadach136.pas; { На срочный вклад в сберегательный банк внесено А рублей. В конце каждого года вклад увеличивается на P% от вклада за предыдущий год. Через сколько лет первоначальный вкла ... }
  •  'Задача137' : Uses zadach137.pas; { Составить программу вычисления количества первых четных чисел, в сумме дающих 56 ... }
  •  'Задача138' : Uses zadach138.pas; { Напечатать таблицу перевода температуры из градусов по шкале Цельсия © в градусы по шкале Фаренгейта (F) для значений температуры от 15°C до 30°C с шагом 1°C. Примечание: ... }
  •  'Задача139' : Uses zadach139.pas; { Каждая бактерия делится на две через 1 минуту. В начальный момент имеется 1 бактерия. Сколько бактерий будет через N минут? ... }
  •  'Задача14' : Uses zadach14.pas; { Методом итераций вычислить на ЭВМ корень уравнения вида f(x)=0, расположенного на интервале [a;b], с абсолютной погрешностью ε. Определить также число итераций, необ ... }
  •  'Задача14' : Uses zadacht14.pas; { Удалить символ номер N=5 из A$. ... }
  •  'Задача140' : Uses zadach140.pas; { Вычислите значение Sin, Cosи tgуглов от 0 до 45 градусов с шагом 1 градус. ... }
  •  'Задача141' : Uses zadach141.pas; { Найдите max их трех чисел А, В, С ... }
  •  'Задача142' : Uses zadach142.pas; { Изменить порядок следования элементов в массиве на обратный. ... }
  •  'Задача143' : Uses zadach143.pas; { Нарисовать координатную сетку, синусоиду, касательную к ней и асимптоту ... }
  •  'Задача144' : Uses zadach144.pas; { В закрытом ящике находится N белых и М черных шаров.По исходному перечню вынутых шаров (заданному в форме:"белый,черный,..."): 1)рассчитать и вывести вероятности появлен ... }
  •  'Задача145' : Uses zadach145.pas; { Вычислить значение выражения (a!+b!)/c! ... }
Else
 writeln('Ничего не выбрано!');
End;REM basic