Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Форум программистов и сисадминов Киберфорум > Форум программистов > Pascal (Паскаль) > Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Социальные группы Поиск Сообщения за день Заказать работу  
Другие темы раздела
Turbo Pascal Составить программу нахождения переменной Y для различных значений аргумента Х Составить программу нахождения переменной Y для различных значений аргумента Х, используя операторы CASE и IF. Вывести на печать значения аргумента, функции и промежуточных значений. Предусмотреть в программе обход арифметических операций, которые могут при определенных значений аргумента Х иметь неопределенный результат, то есть деление на ноль, извлекаемые корня четной степени из отрицательного... https://www.cyberforum.ru/ turbo-pascal/ thread1135414.html Turbo Pascal Вычислить прирост числа тракторов в пересчете на эталонные
Здраствуйте! Нужно написать программу с использованием подпрограммы-функции решения задачи, записать в виде подпрограммы. Условие ссылка на сторонний ресурс удалена 20. Вычислить прирост числа тракторов в пересчете на эталонные, где - массив количества тракторов в отчетном году, - массив количества тракторов в базисном году. Вы нарушили правила форума:1. 4. Официальными языками форума...
Turbo Pascal Составить программу вычисления факториала по формуле n!(m!(n-m!) https://www.cyberforum.ru/ turbo-pascal/ thread1135371.html
Составить программу вычисления факториала по формуле n!(m!(n-m!)), при этом используя функцию или процедуру 		Turbo Pascal Подсчитать число вхождений в строку сочетаний 'ab'; https://www.cyberforum.ru/ turbo-pascal/ thread1135369.html
Дана строка: abcdefghaweidkrjrfyqaafreudiabchdabegrtf а) подсчитать число вхождений в строку сочетаний 'ab'; б) определить входит ли в строку сочетание 'abcdefgh'; в) подсчитать число вхождений в строку букв 'a','b','c','d', 'e','f'. плиз, помогите, от этого зависит зачет
Составить программу вычисления суммы функционального ряда Turbo Pascal
Дается кол-во членов n=40, диапазон изменения аргумента и шаг. 		Turbo Pascal Составить программу, которая печатает номер курса, на котором самые распространенные мужские и женские имена https://www.cyberforum.ru/ turbo-pascal/ thread1135305.html
В отделе кадров студентов хранится следующая информация о каждом студенте: фамилия, имя, отчество, пол, возраст, курс. Составить программу которая печатает номер курса, на котором самые распространенные мужские и женские имена, отчество и возраст которых являются одновременно самыми распространенными. Добавлено через 45 секунд С учётом того что данные уже записаны в файле
Turbo Pascal Определить сумму положительных и произведение отрицательных элементов массива Составить блок схему алгоритма и программу на языке программирования турбо паскаль. Задан массив B20 определить сумму положительных и произведение отрицательных элементов массива. Вывести на печать значение суммы и произведения, а так же количества элементов вошедших в сумму и произведение. Кто может помочь, помогите пожалуйста. Спасибо. https://www.cyberforum.ru/ turbo-pascal/ thread1135296.html Turbo Pascal Вставить пробел перед последними 2-мя символами
помогите. нужно сдать лабу к завтрашнему дню даже в мыслях нет, что делать Задание Вставить пробел перед последними 2-мя символами в слова, имеющие минимальную (заданную) длину
Turbo Pascal Написать программу для расчёта по формуле https://www.cyberforum.ru/ turbo-pascal/ thread1135157.html
Напишите программу для расчёта по формуле: y=4{cos}^{4}{x}^{3}+\frac{x+5}{\left|{x}^{5} \right|} 		Turbo Pascal Дана матрица B размером 7х7. Преобразовать её так, чтобы минимальные элементы строк оказались на главной диагонали https://www.cyberforum.ru/ turbo-pascal/ thread1135155.html
Буду благодарен тем, кто поможет 2) Дана матрица B размером 7х7. Преобразовать её так, чтобы минимальные элементы строк оказались на главной диагонали. Прошу без рандома
Turbo Pascal Сделать массив записей с фамилиями сотрудников, годами их рождения и годами поступления в учреждение. Вывести фамилии
Сделать массив записей с фамилиями сотрудников, годами их рождения и годами поступления в учреждение. Вывести фамилии сотрудников моложе 30 лет и проработавших не менее 5 лет. Заранее спасибо 		Turbo Pascal В заданной целочисленной матрице А размером MxN (m,n<=8). Определить кол-во строк состоящих только из нулей https://www.cyberforum.ru/ turbo-pascal/ thread1135153.html
Буду благодарен тем, кто поможет 1) В заданной целочисленной матрице А размером MxN (m,n<=8). Определить кол-во строк состоящих только из нулей. Прошу без рандома
0 / 0 / 0
Регистрация: 31.03.2014
Сообщений: 3
0

Распечатать таблицу, содержащую номера, фамилии, оценки и количество положительных оценок каждого студента не меньше 3 - Turbo Pascal - Ответ 5981524

01.04.2014, 00:17. Показов 1549. Ответов 3
Метки (Все метки)
Author24 — интернет-сервис помощи студентам
здраствуйте! Нужно написать программу Обработка символьной информации записать в виде подпрограммы.
Условие ссылка на сторонний ресурс удалена
20. Распечатать таблицу, содержащую номера, фамилии, оценки и количество положительных оценок каждого студента это не меньше 3
начало уже есть нужно только

Используя процедуры/функции

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29

Program lr15;
Uses wincrt;
Const n=10;
Var Pib:array [1..n] of string [15];
OC1,OC2,OC3,OC4:array [1..n] of integer;
i:integer;
Procedure Lin (m:integer);
Var i:integer;
begin
for i:=1 to m do
write ('-');
writeln
end;
begin
for i:=1 to n do
readln (Pib[i],OC1[i],OC2[i],OC3[i],OC4[i]);
writeln ('Результати');
writeln ('екзаменаційної сесії');
writeln ('групи студентів');
writeln ('першого курсу');
Lin(77);
Writeln(' N :    Прізвище   : обчислювальна :    вища    : геодезія : бухгалтерський : ');
Writeln('   :               :    техніка    : математика :          :     облік      : ');
Lin(77);
for i:=1 to n do
begin
Writeln(i:3,':',PIB[i]:15,':',OC1[i]:15,':',OC2[i]:12,':',OC3[i]:10,':',OC4[i]:16,':');
End;
Lin(77);
 Комментарий модератора 
Ссылки на сторонние ресурсы запрещены. Рекомендую прочитать правила форума, и не нарушать их. Если будете продолжать писать на форум как Вам нравится, я с Вами нехорошо поступлю.


Вернуться к обсуждению:
Распечатать таблицу, содержащую номера, фамилии, оценки и количество положительных оценок каждого студента не меньше 3 Turbo Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
 01.04.2014, 00:17
Готовые ответы и решения:

Выбрать и вывести фамилии неуспевающих студентов и по каким предметам, подсчитать средний бал оценок каждого студента
По итогам аттестации по нескольким предметам выбрать и вывести фамилии неуспевающих студентов и по...

Имеется массив из N итоговых оценок студента.Если студент является неуспевающим(имеются оценки ниже 4),то замените все его неудовлетворительные оценки
Имеется массив из N итоговых оценок студента.Если студент является неуспевающим(имеются оценки ниже...

Вводя в цикле по 5 оценок каждого студента, подсчитать число студентов, не имеющих оценок 2 и 3
Помогите пожалуйста запутался) Вводя в цикле по 5 оценок каждого студента, подсчитать число...

Имеется n итоговых оценок студента. Расположите эти оценки в следующем порядке: десятки, восьмерки, шестерки. Остальные оценки в произвольном порядке
Имеется n итоговых оценок студента. Расположите эти оценки в следующем порядке: десятки, восьмерки,...

3
01.04.2014, 00:17
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
 01.04.2014, 00:17
Помогаю со студенческими работами здесь

Вычислить средний балл оценок каждого студента и напечатать их фамилии и средний балл (объединение (union))
Дан список студентов. Общие поля: Ф.И.О., дата рождения, группа, средний балл. Вычислить средний...

Вычислить средний балл оценок каждого студента и напечатать их фамилии и средний балл
Вычислить средний балл оценок каждого студента и напечатать их фамилии и средний балл.

Дана матрица, содержащая оценки группы. Найти количество единиц, двоек и троек у каждого студента
Дана матрица А, имеющая 30 строк и 10 столбцов, содержащая оценки группы за первый семестр. Найдите...

Имеется n итоговых оценок студента. Определите, является ли студент неуспевающим (имеются оценки ниже 4)
Имеется n итоговых оценок студента. Определите, является ли студент неуспевающим (имеются оценки...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru