Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Turbo Pascal Имеются два массива https://www.cyberforum.ru/ turbo-pascal/ thread223627.html
Имеются два массива АI(IO) и ВI(I2), содержащие , как положительные, так и отрицательные элементы. Получить новые массивы А2 и В2 соответственно только с положительными и только отрицательными элементами.
Slip-cтруктура Turbo Pascal
помогите пожалуйста, нужно построить простейшую структуру типа slip-кольца. это единственное что мне извесно. ни какой толком информации я не нашел. file://localhost/C:/Documents%20and%20Settings/Admin/Рабочий%20стол/slip.JPG
Turbo Pascal Как нарисовать график функции y=2*x в Turbo Pascal Как нарисовать график функции y=2*x в Turbo Pascal https://www.cyberforum.ru/ turbo-pascal/ thread223604.html Turbo Pascal Где можно скачать turbo pascal бесплатно, на русском? https://www.cyberforum.ru/ turbo-pascal/ thread223593.html
Помогите! Где можно скачать turbo pascal бесплатно, на русском?
Принадлежит ли точка A(x,y) области заданной фигуры? Turbo Pascal
Вывод на экран сообщения о том, принадлежит ли точка A(x,y) области заданной фигуры. Исходные значения переменных x и у ввести с клавиатуры. Ответом должно служит слово Yes или No.
Turbo Pascal Вычислить значение функции https://www.cyberforum.ru/ turbo-pascal/ thread223561.html
f(x)=sin^3 x - cos x примерно так, но есть ошибки - vаr f,x:real; begin readln(x); f:=sqr(sin(x))*sin(x)-cos(x); writeln ('f(x)=', f:0:2);
Turbo Pascal Найти продукты которые есть в каждом магазине Дано n магазинов, в каждом из которых имееться количество из m продуктов. Найти продукты которые есть в каждом магазине, продукты которых нет не в одном https://www.cyberforum.ru/ turbo-pascal/ thread223498.html вычислить значение функции в Turbo Pascal Turbo Pascal
y=a+syma(2*i^2+i+2)^2/4+syma(i^+3)^2
Turbo Pascal Нужен Паскаль с поддержкой русских символов где скачать паскаль, чтобы он русский язык понимал, типа чтобы по русски можно было там коментарии писать https://www.cyberforum.ru/ turbo-pascal/ thread223470.html Turbo Pascal Используя рекурсивную функцию найдите n-й член арифметической прогрессии Дали лабу,никак не могу понять как сделать программу,помогите. "Используя рекурсивную функцию найдите n-й член арифметической прогрессии,с заданными первым членом A и разностью прогрессии d" https://www.cyberforum.ru/ turbo-pascal/ thread223394.html
Turbo Pascal Поменять местами в матрице компоненты строки, содержащей максимум, с компонентами столбца, содержащего минимум.
Ребята помогите. Сформирован двумерный массив. Поменять местами в матрице компоненты строки, содержащей максимум, с компонентами столбца, содержащего минимум. Если максимумов и (или) минимумов в матрице не-сколько, то взять строку и столбец последних встреченных при переборе из максимумов и минимумов соответственно
Turbo Pascal Составить программу ввода двух одномерных массивов A и И размерностью 2*n Составить программу ввода двух одномерных массивов A и И размерностью 2*n, A=|a1,a2,…a2*n|, B=| b1,b2,…b2*n| и вычислить значение величины Y по формуле: Y=(a1*b1+ a3*b3+ a5*b5+… +a(2*n-1)*b(2*n-1))/ (a2*b2+ a4*b4+ a6*b6+… +a(2*n)*b(2*n)) https://www.cyberforum.ru/ turbo-pascal/ thread223376.html
2 / 2 / 2
Регистрация: 23.10.2010
Сообщений: 53
0

По списку студентов из файла найти самого молодого студента - Turbo Pascal - Ответ 1256662

03.01.2011, 18:13. Показов 993. Ответов 1
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Дан список студунтов в катором указан фамилия и год рождения студента Отпечатать список студентов заданого года рождения.
1.створыты типизованый ваел.
2.Знайты наймолодшого студунта.
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
30
31
32
33
34
35
36
37
Program sss;
uses crt;
   type
dan = record
 name:string[10];
 year:word;
end;
 
var f:file of dan; p:dan; ch:char; d,n,i:byte;s:longint;
LineCount:word;
 begin   clrscr;
 
assign (f,'primer.zap');
rewrite(f);
Write ('Vvedite kolichestvo studentov  ') ;
readln(n) ;
for i:=1 to n do begin
  Write ('Vvedite imya studenta  ');read(p.name);
  Write ('Vvedite god rozhdeniya studenta  ');readln(p.year);
write(f,p); end;
close(f);
reset(f); s:=0;
 Writeln ('Vvedite god rozhdeniya studenta');
readln (d);
while not Eof(f) do  begin
read(f,p);
if p.year=d then
Writeln(p.name:20); 
end;
 
while not Eof(f) do  begin
read(f,p);
if p.year<p.year
Writeln(p.name:20); 
end;
readln
end.
Подскажыте как найты наймолодшого студунта со списка.
Ато я написал а ано не работает.

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

Вывести на экран фамилию самого молодого студента и его возраст.
Помогите с задачами. 1.Дан текстовый файл, содержащий данные о студентах: фамилия студента,...

Вывести на экран фамилию самого старшего студента и средний возраст для всех студентов
Создать файл, элементами которого являются сведения о студентах: фамилия, возраст, место...

Найти и вывести на экран самого молодого студента
Дан массив записей, содержащй сведения о студентах группы: фамилия и нициалы студента, дата...

Найти самого молодого родившегося осенью студента
помогите исправить код данный код: найти самого молодого родившегося осенью исправить: найти...

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

Найти и вывести на экран самого молодого студента
Дан массив записей, содержащий сведения о студентах группы: фамилия и инициалы студента, Дата...

Найти и вывести на экран самого молодого студента, родившегося осенью
Приветствую всех. Я на вашем форуме новенький, поэтому поправляйте, если что не так. Мне нужна...

Определить самого молодого и самого старшего из студентов, их порядковые номера
Пожалуйста помогите написать программу) Дан массив Z возрастов студентов группы . 1)...

Определить самого молодого и самого старшего из студентов
Пожалуйста помогите написать программу) Даны сведения о возрасте студентов группы V . 1) ...

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