PROGRAM7510.BAS

{* Задачи *}

{ Выберите программу или раздел при помощи графического манипулятора «Мышь» ! }
Case User Of
  •  'Задача369' : Uses zadach369 .pas; { Дано натуральное число, определить сколько раз в нем встречается максимальная цифра. ... }
  •  'Задача37' : Uses zadach37.pas; { Дана последовательность символов. Заменить все буквы А на В. ... }
  •  'Задача370' : Uses zadach370.pas; { Найти и вывести все числа первой Сотни заканчивающися на 5 ... }
  •  'Задача371' : Uses zadach371.pas; { Подсчитать сумму квадратов и произведение элементов одномерного массива ... }
  •  'Задача372' : Uses zadach372.pas; { Два трехзначных числа, мне нужно найти сумму новых, чтобы поменялись крайние цифры. ... }
  •  'Задача373' : Uses zadach373.pas; { S=(a^2+2*a*b+b^2)/(a-1) a и b, если S>100 тогда закончить программу, иначе ввести другие a и b ... }
  •  'Задача374' : Uses zadach374.pas; { Составить программу, которая печатает таблицу умножения числа N на число от 1 до 10 ... }
  •  'Задача375' : Uses zadach375.pas; { Дано действительное число a, натуральное число n>1 Найти S a(a+1)(a+2)...(a+n-1) ... }
  •  'Задача376' : Uses zadach376.pas; { Найти размеры всех прямоугольников площадь которых равна натуральному числу S, стороны которых выражены натуральными числами. Помогите составить программу, пожалуйста! ... }
  •  'Задача378' : Uses zadach378.pas; { Нахождение суммы минимального и максимального из 5 чисел ... }
  •  'Задача379' : Uses zadach379 .pas; { Определить сколько раз меняется знак в числовой последовательности ... }
  •  'Задача38' : Uses zadach38.pas; { Перевернуть текст наоборот ... }
  •  'Задача380' : Uses zadach380.pas; { Даны координаты двух полей шахматной доски( в виде двух пар чисел от 1 до 8). Определить , может ли шахматный король одним ходом перейти с одного заданного поля на другое ... }
  •  'Задача381' : Uses zadach381.pas; { Определить произведение двух первых цифр заданного четырёхзначного числа f. ... }
  •  'Задача382' : Uses zadach382.pas; { Дана длинна ребра куба а. Найти объём куба и площадь его боковой поверхности. ... }
  •  'Задача383' : Uses zadach383.pas; { Надо составить программу, выводящую на экран все натуральные трёхзначные числа, делящиеся без остатка на 17, сумма цифр которых равняется 11. ... }
  •  'Задача384' : Uses zadach384.pas; { Cоставить программу вычисления и выдачb на печать произведения N элементов бесконечного числового ряда y=(-512)256(-128)... ... }
  •  'Задача385' : Uses zadach385.pas; { Определить количество и сами числа сверхпростых чисел в натуральном ряду, не превышающих 1000. Сверхпростым называется простое число, перевертыш которого тоже является пр ... }
  •  'Задача386' : Uses zadach386.pas; { Билет перевертыш- это такой билет с шестизначным номером, которое читается одинаково слева и наоборот. Например 627726. Составить программу, для нахождения всех таких ном ... }
  •  'Задача387' : Uses zadach387.pas; { У прилавка магазина выстроилась очередь из n покупателей. Время обслуживания i - того покупателя равно t(i) (i=1,.....,n). Определить время с(i) пребывания i-го покупател ... }
  •  'Задача388' : Uses zadach388.pas; { Из последовательности чисел a1, a2,..., an выбрать отрицательные элементы, подсчитать их число и переписать их подряд в массив x. ... }
  •  'Задача389' : Uses zadach389.pas; { Для учащихся закупленно 100 билетов в кино на общую сумму 3400 рублей. Билеты стоят 30 и 40. Сколько билетов было по 30 и по 40 рублей? ... }
  •  'Задача39 ' : Uses zadach39.pas; { Символьная строка. Сколько раз в этой последовательности встречается “A”? ... }
  •  'Задача390' : Uses zadach390.pas; { Является ли заданное натуральное число палиндромом? ... }
  •  'Задача391' : Uses zadach391.pas; { Вычислить: ... }
  •  'Задача392' : Uses zadach392.pas; { Вычислить ... }
  •  'Задача393' : Uses zadach393.pas; { Вычислить: ... }
  •  'Задача394' : Uses zadach394.pas; { Вычислить: ... }
  •  'Задача395' : Uses zadach395.pas; { Вычислить: ... }
  •  'Задача396' : Uses zadach396.pas; { Вычислить ... }
Else
 writeln('Ничего не выбрано!');
End;REM basic