|
|
Другие темы раздела | |
Turbo Pascal Хватит ли в баке автомобиля бензина, чтобы доехать до ближайшей заправочной станции? 1.Хватит ли в баке автомобиля бензина, чтобы доехать до ближайшей заправочной станции? 2.Составьте программу, определяющую, входит ли введенная вами цифра в десятичную запись введенного вами трехзначного числа. 3.Дано натуральное n. Вычислить: 1/11 + 1/22 + ... + 1/n n. 4.С клавиатуры вводятся N чисел. Составьте программу, которая определяет количество отрицательных, количество... https://www.cyberforum.ru/ turbo-pascal/ thread329600.html |
Выбрать все элементы исходного массива до второго нуля и записать в новый массив Turbo Pascal Добрый днеь/вечер/ночь. Такая вот проблема. Дан массив одномерный нужно выбрать все элементы до второго нуля и создать в новый массив. Пробовал цикл с пост условием,ну и очевидно что не то,а вот как то сделать придумать не могу. Procedure Vybor(var A,B: Mas; N: Byte; var g: byte); var i: integer; begin ... |
Turbo Pascal Определить количество максимальных значений последовательности
https://www.cyberforum.ru/ turbo-pascal/ thread329509.html С клавиатуры вводятся целые числа. Признак конца ввода – ноль. Определить количество максимальных значений. Проблема состоит в том, что нужно справиться без массива. Максимальное я нахожу, но как одновременно с этим посчитать их кол-во без использования массива ума не приложу....... Вот так я ищу максимум: ...... i:=1; repeat |
Turbo Pascal массив Задано масив цілих чисел а(10..100) . Розробити програму, яка перетворює цей масив так, щоб у кожній десятці спочатку розміщувалися від’ємні числа, а потім невід’ємні, які є в цій десятці, із збереженням порядку їх наступності. https://www.cyberforum.ru/ turbo-pascal/ thread329478.html |
Turbo Pascal Определить количество элементов массива Задан двумерный массив A целых чисел (таблица) размерности (NxN). Определить количество элементов-чисел в записи, которых в старшем разряде встречается заданная цифра L. |
Turbo Pascal Даны натуральные числа n, a1, a2, … Даны натуральные числа n, a1, a2, … ,an. Определить количество ak последовательности a1,a2,…,an удовлетворяющих условию 2 в степени к <ak<k. https://www.cyberforum.ru/ turbo-pascal/ thread329432.html |
Turbo Pascal Написать программу создания динамического массива
https://www.cyberforum.ru/ turbo-pascal/ thread329389.html Написать программу создания динамического целочисленного массива. Заполнить его случайными значениями и обнулить все четные значения . Помогите! |
Дано натуральное 7-ми значное число. Turbo Pascal Всем привет! Помогите пожалуйста составить программу. Спасибо! Дано натуральное 7-ми значное число. Вычислить произведение цифр этого числа. |
Turbo Pascal Посчитать количество введенных букв "а" написать программу создания динамического символ массива . Ввести его значения с терминала и посчитать количество введенных букв "а". Извините за наглость , но нужно очень срочно ! https://www.cyberforum.ru/ turbo-pascal/ thread329372.html |
Turbo Pascal контрольная работа
https://www.cyberforum.ru/ turbo-pascal/ thread329349.html 1. Составить программу для вычисления заданного смешанного арифметического выражения типа REAL (переменная х). Исходные данные должны вводиться с проверкой на область допустимых значений Y=ctg(x)-√(1+x^2 ) |
Turbo Pascal Вычислить сумму положительных элементов последовательности из n произвольных чисел. не получается составить программу, помогите пожалуйста... Условие: вычислить сумму положительных элементов последовательности из n произвольных чисел. var i,j,n:word; s,k:longint; begin write('Введите n='); readln(n); i:=1; while i<=n do begin i:=i+1; write('k='); |
Turbo Pascal Даны натуральное число n, действительное число x. Вычислить Даны натуральное число n, действительное число x. Вычислить: ЧЕРЕЗ ФУНКЦИЮ! 1) 1/n! Σ(верхний предел n нижний k=1) (-1)^k*(x^k/(k!+1)!) 2) Σ(верхний предел n нижний k=1)Σ(верхний предел n нижний m=k)*(x+k)/m Дано действительное число x и натуральное n. Описать функции: 1) arcthx=Σ(верхний предел бесконечность, нижний n=0) 1/(2*n+1)^(2*n+1), для \x\>1 2) sin(x) = Σ(верхний... https://www.cyberforum.ru/ turbo-pascal/ thread329282.html |
1 / 1 / 0
Регистрация: 07.02.2011
Сообщений: 92
|
|
0 | |
Напечатать список абитуриентов набравших на экзаменах N и более баллов - Turbo Pascal - Ответ 181783604.07.2011, 21:03. Показов 1952. Ответов 2
Метки (Все метки)
В файл записать информацию об абитуриентац ,поступающих в университет:фамилия,имя,отчество,домашний адрес,номер телефона,изучаемый язык,сумма баллов,полученных на вступительных экзаменах. Напечатать список абитуриентов набравших на экзаменах N и более баллов
Вернуться к обсуждению: Напечатать список абитуриентов набравших на экзаменах N и более баллов Turbo Pascal
0
|
04.07.2011, 21:03 | |
Готовые ответы и решения:
2
Записи. Файлы прямого доступа. Вывести абитуриентов, набравших меньше 12 баллов Напечатать список абитуриентов в порядке убывания суммы набранных баллов Вывести список абитуриентов, отсортированный по сумме баллов, полученных на экзаменах Напечатать фамилии участников олимпиады, набравших 100 баллов |
04.07.2011, 21:03 | |
04.07.2011, 21:03 | |
Помогаю со студенческими работами здесь
0
Файл содержит сведения об абитуриентах. Выведите список абитуриентов из задаваемой школы и определите их общий балл на вступительных экзаменах Вывести список команд,набравших более Z очков Создать массив объектов. Вывести: список абитуриентов, у которых сумма баллов выше заданной Составить список зачисленных абитуриентов в порядке убывания балла и список абитуриентов с полупроходным баллом |