|
|
Другие темы раздела | |
Turbo Pascal Вывести квадрат чисел от введённого пользователем значения до 1
https://www.cyberforum.ru/ turbo-pascal/ thread242567.html Написать программу, выводящую квадрат чисел от введённого пользователем значения до 1 |
Turbo Pascal Простые числа Определите все простые числа, значения которых находятся в диапазоне от M до N. Составить блок-схему, написать программу. |
Turbo Pascal Реализовать в виде модуля набор подпрограмм для выполнения операций над комплексными числами Пожалуйста помогите решить (надеюсь не сложную для вас) задачу про модуль. Реализовать в виде модуля набор подпрограмм для выполнения следующих операций над комплексными числами: 1) сложения; 2) вычитания; 3) умножения; 4) деления; 5) модуля комплексного числа; 6) возведения комплексного числа в степень п (п — натуРальное). комплексное число пРедставить следующим типом: tyPe... https://www.cyberforum.ru/ turbo-pascal/ thread242544.html |
Turbo Pascal Написал "алгоритм", но что-то упустил
https://www.cyberforum.ru/ turbo-pascal/ thread242539.html Здравствуйте, помогите плз найти ошибку, и если нетрудно, подскажите в правильном ли направлении я написал алгоритм для этого уравнения? program kr1_2; uses crt; var x,y,R,F:real; begin; writeln('Enter x,y'); readln(x,y); |
Нахождение всех автоморфных чисел на заданном отрезке Turbo Pascal Составьте программу для нахождения всех автоморфных чисел в отрезке . Автоморфным называется целое число, запись которого совпадает с последними цифрами его квадрата. 5^2=25,6^2=36,25^625. |
Turbo Pascal Нарисовать эллипс, вписанный в ромб
https://www.cyberforum.ru/ turbo-pascal/ thread242503.html нарисовать эллипс вписанный в ромб; a,b-полуоси внутреннего эллипса; n-количество описанных около эллипсов ромбов |
Turbo Pascal Возведение вещественного числа в целую степень
https://www.cyberforum.ru/ turbo-pascal/ thread242485.html (спс) |
Turbo Pascal Найти количество повторяющихся пробелов в тесте. Найти количество повторяющихся (которые повторяются несколько раз подряд) пробелов в тесте. |
Turbo Pascal Определить, сколько треугольников с вершинами в данных точках можно построить В одномерных массивах Х и Y одинакового размера n хранятся координаты n точек плоскости. Определить, сколько треугольников с вершинами в данных точках можно построить. Добавлено через 2 минуты uses crt; const nmax=19; function Radius(x,y:integer):real; begin Radius:=sqrt(x*x+y*y); end; var x,y:array of integer; https://www.cyberforum.ru/ turbo-pascal/ thread242468.html | Turbo Pascal Составить блок схему к готовому коду Program lab2; uses crt; var n:integer; begin repeat write('Номер дня n='); readln(n); until n in ; case n of 1: write('3 урока'); https://www.cyberforum.ru/ turbo-pascal/ thread242464.html |
Turbo Pascal Найти ошибку Program lab2; uses crt; var n:integer; begin repeat write('Номер дня n='); readln(n); until n in ; case n of write('3 урока'); |
Turbo Pascal Вычислить значение выражения
https://www.cyberforum.ru/ turbo-pascal/ thread242449.html (спс!) |
0 / 0 / 0
Регистрация: 12.09.2010
Сообщений: 25
|
|
16.02.2011, 22:10 [ТС] | 0 |
Вывести K-й элемент файла (элементы нумеруются от 1). Если такой элемент отсутствует, то вывести - "Элемент отсутствует" - Turbo Pascal - Ответ 137517916.02.2011, 22:10. Показов 3050. Ответов 4
Метки (Все метки)
Ответ
Помогите, пожалуйста, с программкой.
Вернуться к обсуждению: Вывести K-й элемент файла (элементы нумеруются от 1). Если такой элемент отсутствует, то вывести - "Элемент отсутствует" Turbo Pascal
0
|
16.02.2011, 22:10 | |
Готовые ответы и решения:
4
Дано число k и файл, содержащий ненулевые целые числа. Вывести элемент файла с номером k. Если такой элемент отсутствует, то вывести 0. Дано число k и файл, содержащий ненулевые целые числа. Вывести элемент файла с номером k (элементы файла нумеруются от нуля). Если такой элемент отсут Если такой элемент отсутствует, то вывести 0 Файл: Вывести K-й элемент файла (элементы нумеруются от 1) Дано целое число K и файл, содержащий неотрицательные целые числа. Вывести K-й элемент файла (элементы нумеруются от 1) |
16.02.2011, 22:10 | |
16.02.2011, 22:10 | |
Помогаю со студенческими работами здесь
0
Добавить элемент-символ к списку символов, если он в нем отсутствует Написать программу, возвращающую k-й элемент файла целых чисел с именем Name (элементы нумеруются от 0) Найти в массиве максимальный повторяющийся элемент (или вывести -1, если ни один элемент не повторяется) Найти наименьший четный элемент массива (если такого нет, то вывести первый элемент) Вывести содержимое списка в следующем порядке: первый элемент, последний элемент, второй элемент, предпоследни Вывести содержимое списка в следующем порядке: первый элемент, последний элемент, второй элемент, предпоследни |