Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Задачка с экзамена Здравствуйте. Дали пример билета с прошлого года по предмету программирование. Тк вот никакие задания не вызывают трудностей, кроме 7го. Помогите ради бога. По идее нужен массив указателей на массив... https://www.cyberforum.ru/ pascal/ thread2568846.html Pascal Определить, включена ли опция "Complete boolean evaluation"
Книга: ОСНОВЫ Турбо-Паскаля. Фаронов В.В. 1992 год. Книжный пример на стр. 76: При выполнении этого фрагмента значение переменной А будет зависеть от настройки опции: ...
Pascal Типы констант Книга: ОСНОВЫ Турбо-Паскаля. Фаронов В.В. 1992 год. Например: const (стр. 75) MaxReal = MaxInt div SizeOf(real); NumChars = ord(Z) – ord(‘a’) + 1; ... https://www.cyberforum.ru/ pascal/ thread2568708.html Pascal Получить отрицательную сумму https://www.cyberforum.ru/ pascal/ thread2568707.html
Книга: ОСНОВЫ Турбо-Паскаля. Фаронов В.В. 1992 год. Пример 5: Программа вводит целое положительное число N (стр. 37) и подсчитывает сумму целых чисел от 1 до N. Прямая форма оператора...
Pascal А в чём разница между стандартным Паскалем и Турбо Паскалем?
Книга: ОСНОВЫ Турбо-Паскаля. Фаронов В.В. 1992 год. Стр. 74: В отличие от стандартного Паскаля в Турбо Паскале раз- решается в объявлении констант использовать произвольные вы- ражения,...
Pascal Решение нелинейных уравнений, итераций в паскале Помогите пожалуйста, это только часть, где тут ошибка? когда запускаю программу, пишет х= а дальше все... ничего... f := proc (x) options operator, arrow; cot(x)+(1/2)*x end proc; q := proc (x)... https://www.cyberforum.ru/ pascal/ thread2568692.html
Pascal Вычислить значение функции y(x). Паскалем пользуюсь первый раз и все никак не могу разобраться .. Тем более уж решить . Может кто знает как сделать данное уравнение ? Задача такая : ставить блок-схему алгоритма и программу на... https://www.cyberforum.ru/ pascal/ thread2568668.html Составить программу и блок-схему алгоритма для вычисления площади 5 квадратов со сторонами, изменяющимися от 0 до 15 Pascal
Составить программу и блок-схему алгоритма для вычисления площади 5 квадратов со сторонами, изменяющимися от 0 до 15 в цикле.
Pascal Исправить код игры Это вроде как игра. Стреляем из пушки по цели через гору. Проблема в том что пушка стреляет через раз. Не могу понять в чем тут проблема. Вводим начальную скорость и угол наклона, и пушка стреляет.... https://www.cyberforum.ru/ pascal/ thread2568254.html Pascal Дан массив C(10) сформируйте из него два массива A и B составьте программу для решения следующей задачи Дан массив C(10) сформируйте из него два массива A и B , Предварительно определите их длину ,включая массив A четные положительные элементы ,а массив... https://www.cyberforum.ru/ pascal/ thread2568152.html
Pascal Вычислить произведение и количество элементов массива, не равных нулю и больших b
Составить блок-схему алгоритма и программу для обработки массива из 20 чисел X = (0,3; 5; 69; –3; 52; –20; –9; –23; –9; 10; 36; 12; 15; 23; –0,2; –36; –0,3; 8; 45; –7) при b = –6 Вычислить...
Pascal Вычислить значение выражения. https://www.cyberforum.ru/ pascal/ thread2567923.html
Нужна помощь по паскалю не могу ни как решить. Составить блок-схему алгоритма и программу на Паскале для вычисления функций z. Ввести программу в ЭВМ, вычислить значения функции и проверить ее для...
0 / 0 / 0
Регистрация: 14.12.2019
Сообщений: 8
0

Напишите программу, которая вводит и печатает эту информацию и печатает фамилии студентов, родившихся после 1970 года - Pascal - Ответ 14169161

12.01.2020, 22:57. Показов 832. Ответов 1
Метки (Все метки)

Задание:
Запись имеет четыре поля, содержащие фамилию и дату рождения (число, месяц, год) студента. Напишите программу, которая вводит и печатает эту информацию и печатает фамилии студентов, родившихся после 1970 года.

Что изменить, чтобы все условия соблюдались?

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
PROGRAM PR35;
USES CRT;
TYPE  STUDENT=RECORD
      SURNAME,DATE,MONTH,YEAR:STRING; 
      G:85..95; N:1..4;  END;
      MAS=ARRAY[1..5] OF STUDENT;
VAR  S:MAS; I:INTEGER; C:CHAR;
BEGIN 
CLRSCR; 
 FOR I:=1 TO 5 DO 
  WITH S[I] DO BEGIN
  WRITELN('  ДАННЫЕ ПРО  ',I,'-ОГО СТУДЕНТА:');
  WRITELN('            ФАМИЛИЯ?:'); READLN(SURNAME);
  WRITELN('              ЧИСЛО?:'); READLN(DATE);
  WRITELN('              МЕСЯЦ?:'); READLN(MONTH);
  WRITELN('                ГОД?:'); READLN(YEAR);
  END; 
  WRITELN('===конец ввода====');
  C:=READKEY;  
  CLRSCR;
  WRITELN(' ':5,'список всех студентов:');
  FOR I:=1 TO 5
  DO
   WITH S[I] DO
   WRITELN(' ', SURNAME:10,DATE:10,MONTH:5,YEAR:3,'-');
   WRITELN(' ':5,'список студентов');
END.


Вернуться к обсуждению:
Напишите программу, которая вводит и печатает эту информацию и печатает фамилии студентов, родившихся после 1970 года Pascal
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
12.01.2020, 22:57
Готовые ответы и решения:

Напишите программу, которая вводит и печатает эту информацию и печатает фамилии студентов, родившихся летом
запись имеет четыре поля, содержащие фамилию и дату рождения (число, месяц, год) студента. Напишите...

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

Написать программу, которая вводит информацию и печатает ФИО людей выше 170 см
Помогите пожалуйста, очень прошу. Определить комбинированный тип для представления следующих...

Написать программу, которая вводит номер некоторого года и печатает его название по старояпонскому календарю
16 В старояпонском календаре был принят 12-летний цикл. Годы внутри цикла носили названия животных:...

1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.01.2020, 22:57

Написать программу, которая вводит номер некоторого года и печатает его название по старояпонскому календарю
Задание )В старояпонском календаре был принят 12-летний цикл. Годы внутри цикла носили названия...

Написать программу, которая вводит номер некоторого года и печатает его название по старояпонскому календарю
В старояпонском календаре был принят 12-летний цикл. Годы внутри цикла носили названия животных:...

Написть программу которая вводит номер некоторого года и печатает его название по старояпонскому календарю
В старословянском календаре был принян 12-летний цикл Годы внутри цикла носили название животных:...

Написать программу, которая вводит дату некоторого дня года и печатает название соответствующего знака Зодиака
Известно, что астрологи делят год на 12 периодов и каждому из них ставят в соответствие один из...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.