|
#1
|
|||
|
|||
6 задач по Delphi
Попросили сделать задачи, а времени их делать нет(( Некоторые несложные... А вот с №1 я намучался). Но так и не сделал.
№1 В матрице А (N,K) удалить строки и столбцы, в которых есть хотя бы один нулевой элемент (процедурой, чтоение из файла + запись в файл) №2 Составить программу с функцией имеющей 1 параметр (одномерный массив), Функция задана условием: f(x1, x2, ..., xn)= СУММА(i от 1 до n)[ x(i-тое)в_степени_k + 1 ] , если -1<x(i-тое)<1 f(x1, x2, ..., xn)= 0 - иначе Использовать модули. №3 Вычислить значение квадр.корня y=корень из х, для 100 значений х по итер.формуле Герона у(i-тое+1) = 1/2(У(i-тое) + Х(j-тое)/У(i-тое)); У(нулевое)= (1+Х(i-тое))/2 Точность Е = 0,001, где Е = (У(i-тое+1)-У(i-тое)) Использовать рекурсию №4 Дана ведомость абитуриентов, сдавших экзамены в универ-е. В каждой строке данной ведомости - фамилия студента и оценки по 3-м дисциплинам. Определить средний балл по институту и распечатать список абитуриентов, чей балл выше, чем по универ-у. Список сортируется по средн. баллу в порядке убывания. + Возможность добавлять/удалять, смотреть список. №5 Формируем множество y и выделяем из него подмножество y1, которое представляет из себя глухие согласный, входящие в y. №6 Y=(X1\X2) . Вывести y , делящиеся на 3 без остатка. X1 = {1,2,3,4,5,6} X2 = {1,3,4,5,6} ____________ 1-2-3 самые нужные! ____________ Спасибо. |