{ Выберите программу или раздел при помощи графического манипулятора «Мышь» ! } Case User Of
'Задача 316' : Uses zadach316.pas; { Дана символьная строка, содержащая текст, заканчивающийся точкой. Вывести на экран слова, содержащие три буквы. ... }
'Задача 317' : Uses zadach317.pas; { Программа случайного предсказания одного из десяти вариантов ближайшего будущего с вероятностью 1/20, в остальных случаях – Вы «неудачник». ... }
'Задача 318' : Uses zadach318.pas; {
Ввести значения четырёх чисел х1, х2, х3, х4. Вычислить
значение переменной y1,
y2, y3, y4, z,
при условии, что Y1:=1/sqr(8*x1-x4), Y2:=(2*x1+5*x2)/ln(4*x1-x2), Y3:=ln(5 ... }
'Задача 319' : Uses zadach319.pas; { Вычислить приближённое значение бесконечной суммы последовательности х-(х^2)/2+(x^3)/3… . Нужное приближение считается полученным, если вычислена сумма нескольких первых ... }
'Задача 32' : Uses massiv32.pas; { Вычислить длину вектора . Получить массив направляющих косинусов вектора ... }
'Задача 320' : Uses zadach320.pas; { Ввести с клавиатуры матрицу 5х5, составленную из чисел 1, 2,…25. Определить является ли заданная целочисленная матрица «магическим квадратом», т.е. такой, в которой сумма ... }
'Задача 321' : Uses zadach321.pas; { Дана последовательность из 32 символов. В ней есть слова, которые отделяются друг от друга запятыми. Длина слов от 3 до 7 символов, считается, что длиннее 7 символов слов ... }
'Задача 322' : Uses zadach322.pas; { В файл f записать целые числа в следующем порядке: десять положительных, десять отрицательных, десять положительных и т.д. Переписать компоненты файла f в файл g в следую ... }
'Задача 323' : Uses zadach323.pas; { Изобразить на экране две спирали которые
завинчиваются навстречу и пересекаются. ... }
'Задача 324' : Uses zadach324.pas; { Изобразить движение машины, которая останавливается около светофора и затем продолжает движение. ... }
'Задача 325' : Uses zadach325.pas; { Найти площадь той части окружности, которая осталась после удаления из нее заданной вписанной окружности ... }
'Задача 326' : Uses zadach326.pas; { Определение площади фигуры методом Монте-Карло ... }
'Задача 327' : Uses zadach327.pas; { Определить вид треугольника по трем заданным сторонам. ... }
'Задача 328' : Uses zadach328.pas; { Даны числа а1, b1, c1, a2, b2, c2. Напечатать координаты точки пересечения прямых, описываемых уравнениями.
a1x+b1y=c1 и a2x+b2y=c2
Либо сообщить, что эти прямые совпадаю ... }
'Задача 329' : Uses zadach329.pas; {
Даны числа
a, b и
c (a≠0). Найти вещественные
корни уравнения ax4+bx2+c=0. Если корней нет, то сообщить об этом. ... }
'Задача 33' : Uses zadach33.pas; { Из строки удалить среднюю букву, если длина строки нечётная, иначе -
удалить две средние буквы( я так понял тут надо через оператор
delete-КЭП). ... }
'Задача 330' : Uses zadacha330.pas; { Дан текстовый файл f, содержащий целые числа от1 до
100. Подготовить новый файл для печати этих чисел в две колонки. В левой колонке должны быть размещены числа от 1 до 5 ... }
'Задача 331' : Uses zadacha331.pas; { Известно количество выпущенной продукции тремя заводами за первый квартал (помесячно). Найти среднемесячное количество выпущенной продукции для каждого завода. Вывести ма ... }
'Задача 332' : Uses zadach332.pas; { Имеются линейные однонаправленные списки:
type p=^item; item=record data:real; reference:p end;
Написать программу удаления из списка L одного элемента, следующего за эле ... }
'Задача 333' : Uses zadach333.pas; {
Сформировать
матрицы {aij}n, m ,
{bij}k, l ,
где i<=(n, k), j<=(m, l) , элементы которых
определяются случайно из диапазона целых чисел от -3 до 3. Фактическое чис ... }
'Задача 334' : Uses zadach334.pas; { Проверить, встречается ли в заданном предложении словосочетание «Сальдо счета». ... }
'Задача 335' : Uses zadach335.pas; { Написать программу формирования в интерактивном режиме списка студентов(фамилия, дата рождения, на каком курсе он учиться, количество семестров). ... }
'Задача 336' : Uses zadach336.pas; { Вычислить значения выражения:
y =ax+ b/2+a ... }
'Задача 337' : Uses zadach337.pas; { Известен план выпуска компьютеров и кол-во выпущенных компьютеров тремя фирмами за три месяца. Определить в каком месяце не был выполнен план третьей фирмой. ... }
'Задача 338' : Uses zadach338.pas; { Задана целочисленная матрица А размерностью 5x7. Переставьте местами первую и последнюю строку данной матрицы. ... }
'Задача 339' : Uses zadach339.pas; { Сформировать матрицы {aij}n, m , {bij}k, l , где i<=(n, k), j<=(m, l), по задан-ным
правилам: (i+j)/2, (i*j)/27. Фактическое
число строк (n, k) и столб-цов (m, l) к ... }
'Задача 34' : Uses zadach34.pas; { Заменить все символы Ch1 в данной строке на Ch2 ( Ch1 и Ch2 вводятся с клавиатуры). ... }
'Задача 340' : Uses zadach340.pas; { Вывести на экран n чисел арифметической последовательности
Формула: an=a1+(n-1)*d; ... }
'Задача 341' : Uses zadach341.pas; { Задана последовательность значений элементов некоторого массива до и после преобразования по некоторому правилу. Определите алгоритм преобразования и напишите программу, ... }
'Задача 342' : Uses zadach342.pas; { Написать программу, которая выводит на экран изображение лица человека телесного цвета и с голубыми глазами. ... }