|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
27.12.2015, 21:20 | #1 |
Пользователь
Регистрация: 22.12.2015
Сообщений: 28
|
Несколько школьников выстроились в шеренгу. Для каждого школьника известен день его рождения. Требуется:
Несколько школьников выстроились в шеренгу. Для каждого школьника известен день его рождения. Требуется:Определить, совпадают ли дни рождений хота бы у трех рядом стоящих школьников.
|
27.12.2015, 21:23 | #2 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Написать код ввода шеренги школьников самостоятельно сможешь?
I'm learning to live...
|
27.12.2015, 21:39 | #3 | |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
Цитата:
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
|
27.12.2015, 21:50 | #4 |
Пользователь
Регистрация: 22.12.2015
Сообщений: 28
|
program fasd;
var a:array[1..31] of integer; n,i,b,c,k:longint; begin repeat write('количество учеников не больше 100 000='); readln(n); until(n>0) and (n<100000); for i:=1 to n do begin writeln('введите день рождения в промежутке от 1 до 31'); write('ученика[',i,']='); readln(a[i]); if (a[i]>31) then while (a[i]>31) do begin writeln('ученика [',i,']='); readln(a[i]); end end; |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Требуется оградить два земельных участка,имеющих форму прямоугольников,если для каждого участка заданы его площадь и периметр. Опр | scarecrow_1 | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 23.12.2015 22:32 |
массив записей (В группе школьников n человек. про каждого известно фамилия, рост, вес...) | tata7393 | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 25.12.2014 17:44 |
Для каждого аi найти ki количество его повторов последовательности. | Yakov112 | Общие вопросы C/C++ | 2 | 06.10.2012 23:18 |
по дате рождения и текущей дате (день, месяц, год) определить сколько дней до дня рождения (код на ПАСКАЛЕ) | Николай1 | Помощь студентам | 1 | 16.02.2012 09:07 |
известен год рождения каждого человека из группы | NewArtist | Помощь студентам | 2 | 16.06.2011 06:59 |