Вниз  Pascal
<< 1 ... 28 29 30 31 32 ... 54 >>
- 27.09.2013 / 14:25
#291469
Askalite
  Пользователь
Askalite 
Сейчас: Offline
эм. каково фига delay(61010)=1 секунда?
- 27.09.2013 / 14:38
#291472
Helltar
  Пользователь
Helltar 
Сейчас: Offline
  1. Sleep(1000);
  2. Delay(1000);

- 27.09.2013 / 17:11
#291506
Bogdan-G
  Пользователь
Bogdan-G 
Сейчас: Offline
Helltar, т.е. засыпания не будет?
- 27.09.2013 / 17:46
#291510
Helltar
  Пользователь
Helltar 
Сейчас: Offline
Bogdan-G, эммм... ват?
- 28.09.2013 / 11:32
#291761
St@SyaN
  Пользователь
St@SyaN 
Сейчас: Offline
Askalite (27.09.2013/14:25)
эм. каково фига delay(61010)=1 секунда?Баг турбопаскаля для процессоров, чья тактовая частота выше 200 мГц
- 7.10.2013 / 18:53
#293308
NIKO
  Пользователь
NIKO 
Сейчас: Offline
Вот столкнулся с маленькой проблемкой. Никак не пойду в чем проблема. Столкнулся с ней ещё в университете, но потом всё удалил и решил что напишу дома, на свежую голову, после сна :gg: Но что-то оно так и продолжает матюкатся, я уже хз в чём беда.

Прикрепленные файлы:
Screenshot_4.png (34.68 кб.) Скачано 148 раз
- 7.10.2013 / 19:05
#293311
Helltar
  Пользователь
Helltar 
Сейчас: Offline
NIKO, эммм...

  1. var
  2.   nameTrue, nameFalse: String;
  3.   years, myNumb: Integer;
  4.  
  5. begin
  6.   nameTrue:= 'Yarik';
  7.   nameFalse:= 'NeYarik';
  8.   years:= 19;
  9.   myNumb:= 17;
  10.  
  11.   if years >= myNumb then WriteLn('nameTrue')
  12.   else
  13.     WriteLn('nameFalse');
  14.  
  15.   ReadLn;
  16. end.

- 7.10.2013 / 19:09
#293313
NIKO
  Пользователь
NIKO 
Сейчас: Offline
Helltar, спасибо :)
- 7.10.2013 / 19:11
#293314
Helltar
  Пользователь
Helltar 
Сейчас: Offline
Или:

  1. var
  2.   nameTrue: String = 'Yarik';
  3.   nameFalse: String = 'NeYarik';
  4.   years: Integer = 19;
  5.   myNumb: Integer = 17;
  6.  
  7. begin
  8.   if years >= myNumb then WriteLn('nameTrue')
  9.   else
  10.     WriteLn('nameFalse');
  11.  
  12.   ReadLn;
  13. end.

- 7.10.2013 / 19:18
#293316
NIKO
  Пользователь
NIKO 
Сейчас: Offline
Зачем в конце ReadLn; ?
<< 1 ... 28 29 30 31 32 ... 54 >>
Наверх  Всего сообщений: 540
Фильтровать сообщения
Поиск по теме
Файлы топика (22)