25.03.2008, 16:57
|
#11 (permalink) |
|
support
Регистрация: 19.08.2007
Адрес: Зея
Сообщений: 15,797
Записей в дневнике: 71
Сказал(а) спасибо: 166
Поблагодарили 203 раз(а) в 86 сообщениях
Репутация: 75760
|
Код:
...
var n: integer;
...
writeln('Введите номер месяца');
readln(n);
case n of
1: writeln('январь');
2: writeln('февраль');
3: writeln('март');
4: writeln('апрель');
5: writeln('май');
6: writeln('июнь');
7: writeln('июль');
8: writeln('август');
9: writeln('сентябрь');
10: writeln('октябрь');
11: writeln('ноябрь');
12: writeln('декабрь');
else writeln('нет такого месяца');
end;
...
__________________
Убить всех человеков! |
|
|
|
25.03.2008, 16:57
|
|
|
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
В похожих обсуждениях может скрываться решение вашего вопроса S.T.A.L.K.E.R.: Тень Чернобыля Вопросы по C# Вопросы по БП |
|
25.03.2008, 17:06
|
#12 (permalink) | |
|
support
Регистрация: 19.08.2007
Адрес: Зея
Сообщений: 15,797
Записей в дневнике: 71
Сказал(а) спасибо: 166
Поблагодарили 203 раз(а) в 86 сообщениях
Репутация: 75760
|
Цитата:
Код:
var n, g: integer;
...
writeln('текущий год');
readln(g);
writeln('текущий месяц');
readln(n);
case n of
1, 3, 5, 7, 8, 10, 12: writeln('в месяце 31 день');
4, 6, 9, 11: writeln('в месяце 30 дней');
2: if g/4=round(g/4) then writeln('в месяце 29 дней') else writeln('в месяце 28 дней');
end;
...
__________________
Убить всех человеков! |
|
|
|
|
|
10.11.2009, 21:47
|
#13 (permalink) |
|
Новичок
Регистрация: 24.07.2008
Сообщений: 2
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Не открываются сайты
Добрый вечер у меня возникла проблема перестали открываться сайты, такие как
satsat.info dimonvideo.ru, раньше нормально открывались, а щас нет. При том у меня у знакомого открывается в лет (у на с ним один и тот же провайдер, кент живет в 2х домах от меня) Система ХР SP2, ADSL, модем D-link-2500U Я ставил разные браузеры. Мозила, Опера, IE 6----безрезультатно Чистил кэш 50раз Вроде бы сбрасывал настройки TCP/IP (я не знаю по каким параметрам судить о том что они сброшены). Но нашел прогу Fix It запутил и вроде должно было сброситься--------------безрезультатно **************файл \WINDOWS\system32\drivers\etc\hosts*************** * # (C) Корпорация Майкрософт (Microsoft Corp.), 1993-1999 # # Это образец файла HOSTS, используемый Microsoft TCP/IP для Windows. # # Этот файл содержит сопоставления IP-адресов именам узлов. # Каждый элемент должен располагаться в отдельной строке. IP-адрес должен # находиться в первом столбце, за ним должно следовать соответствующее имя. # IP-адрес и имя узла должны разделяться хотя бы одним пробелом. # # Кроме того, в некоторых строках могут быть вставлены комментарии # (такие, как эта строка), они должны следовать за именем узла и отделяться # от него символом '#'. # # Например: # # 102.54.94.97 rhino.acme.com # исходный сервер # 38.25.63.10 x.acme.com # узел клиента x 127.0.0.1 localhost Вот проверил. Вроде нормальный делал трассировку Microsoft Windows XP [Версия 5.1.2600] (С) Корпорация Майкрософт, 1985-2001. C:tracer yandex.ru "tracer" не является внутренней или внешней командой, исполняемой программой или пакетным файлом. C:\tracert yandex.ru Трассировка маршрута к yandex.ru [87.250.251.11] с максимальным числом прыжков 30: 1 <1 мс <1 мс <1 мс 192.168.1.1 2 17 ms 17 ms 17 ms 1.0.114.188.donpac.ru [188.114.0.1] 3 18 ms 18 ms 17 ms 7609ptpSE800.donpac.ru [80.254.108.189] 4 20 ms 18 ms 22 ms 193.232.140.33 5 36 ms 41 ms 36 ms korolev-vlan2301.yandex.net [213.180.208.18] 6 46 ms 44 ms 38 ms popovich-vlan121.yandex.net [87.250.233.110] 7 44 ms 41 ms 40 ms einstein-vlan2.yandex.net [87.250.228.138] 8 44 ms * 37 ms yandex.ru [87.250.251.11] Трассировка завершена. C:\ satsat.info Трассировка маршрута к satsat.info [78.159.119.191] с максимальным числом прыжков 30: 1 <1 мс <1 мс <1 мс 192.168.1.1 2 18 ms 17 ms 17 ms 1.0.114.188.donpac.ru [188.114.0.1] 3 18 ms 17 ms 18 ms 7609ptpSE800.donpac.ru [80.254.108.189] 4 18 ms 18 ms 18 ms 85.116.254.80.donpac.ru [80.254.116.85] 5 18 ms 18 ms 18 ms 85.173.2.12 6 18 ms 18 ms 18 ms 85.173.2.83 7 33 ms 33 ms 33 ms Atlant.naukanet.ru [77.94.166.45] 8 92 ms 93 ms 93 ms de-cix01.fra3.gatewayrouter.net [80.81.192.147] 9 94 ms 94 ms 94 ms 89-149-218-182.gatewayrouter.net [89.149.218.182 ] 10 * * * Превышен интервал ожидания для запроса. 11 * * * ЛЮДИ ДОБРЫЕ ПОМОГИТЕ СПРАВИТЬСЯ С ЭТОЙ ПРОБЛЕМОЙ!!!!! И ранее такое было помогало только переустановка Винды, а это делать так не хочется, да и невозможно в данный момент. |
|
|
|
| Ads | |
|
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
|
 |
|
|
Линейный вид
