Для N человек с заданной датой рождения вывести сообщение, в какой декаде родился человек

@MedvedevaDY · Регистрация: 03.10.2016

Создайте структуру Дата с элементами День, Месяц, Год. Для N человек с заданной датой рождения вывести сообщение, в какой декаде родился человек.
P.S.декада — Единица исчисления времени, равная 10 дням

@BogaNetOtvechay · 21.06.2017, 15:34

Да тут все просто
Создаешь запись и считаешь сколько дней от начала года прошло. Затем делишь на 10 округляешь в большую сторону, выводишь полученое.

@Cyborg Drone · 21.06.2017, 22:21

BogaNetOtvechay, даже проще. Декады исчисляется, вообще-то, с начала месяца, а не с начала года. Так что, делишь номер дня на 10 нацело и прибавляешь 1.

Pascal

const m = 20;
type data = record day, month, year: integer end;
var person: array[1..20] of data;
    i, n: integer;
begin
  repeat
    write('n in [1..', m, '];  , n = ');
    readln(n)
  until n in [1..m];
  writeln('Enter dates:');
  for i := 1 to n do
    with person[i] do
      begin
        writeln(i, ':');
        write('day: ');
        readln(day);
        write('month: ');
        readln(month);
        write('year: ');
        readln(year)
      end;
  for i := 1 to n do
    with person[i] do
      begin
        write(i, ': ', day, '.');
        if month < 10 then write('0');
        writeln(month, '.', year, ' - was born in the decade ', day div 10 + 1)
      end;
  readln
end.

@MedvedevaDY 0 / 0 / 0 Регистрация: 03.10.2016 Сообщений: 8
		1
	Для N человек с заданной датой рождения вывести сообщение, в какой декаде родился человек 21.06.2017, 15:29. Показов 1818. Ответов 2 Метки нет (Все метки) Создайте структуру Дата с элементами День, Месяц, Год. Для N человек с заданной датой рождения вывести сообщение, в какой декаде родился человек. P.S.декада — Единица исчисления времени, равная 10 дням __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

@BogaNetOtvechay 0 / 0 / 0 Регистрация: 21.06.2017 Сообщений: 2
	21.06.2017, 15:34	2
	Да тут все просто Создаешь запись и считаешь сколько дней от начала года прошло. Затем делишь на 10 округляешь в большую сторону, выводишь полученое. 0

Опции темы

Для N человек с заданной датой рождения вывести сообщение, в какой декаде родился человек

Решение