7.03.2012 / 15:05 | |
betterthenputin Пользователь
| XakepPRO, какие?
|
7.03.2012 / 15:09 | |
betterthenputin Пользователь
| Насчёт inc(): >Ok. I just wrote a 2-line program that uses inc(i) and i := i + 1, then >loaded the executable in Turbo Debugger. It generated the following >instructions:
>inc(i) translated to >inc word ptr [i]
>i := i + 1 translated to >mov ax, [i] >inc ax >mov [i], ax( http://www.delphigroups.info/2/cf/16805.html ) Насчёт индексации - это как душе угодно, конечно. Просто у настоящего программиста 9 пальцев на руках. Изменено betterthenputin (7.03 / 15:09) (всего 1 раз) |
7.03.2012 / 15:22 | |
bogdan-g Пользователь Сейчас: Offline
Имя: Богдан Откуда: Москва Регистрация: 13.02.2011
| betterthenputin, а 10ый где?
|
7.03.2012 / 16:51 | |
TAPAHbl4 Пользователь Сейчас: Offline
Имя: TAPAHbl4 Регистрация: 15.01.2012
| bogdan-g, отсчёт с нуля
|
7.03.2012 / 16:52 | |
TAPAHbl4 Пользователь Сейчас: Offline
Имя: TAPAHbl4 Регистрация: 15.01.2012
| bogdan-g (07.03.2012/12:05)TAPAHbl4, на твой пост (27.02.2012 / 02:17) отвечу, этот на турбо паскаль пойдет?Наверно да, я хз, на Pascal ABC писал betterthenputin, мне начхать на твоё мнение, я пишу как хочу |
7.03.2012 / 19:54 | |
FlyMove Пользователь Сейчас: Offline
Регистрация: 06.01.2011
| По информатике нужно было сделать возведение в степень. Сделал так, правильный вариант? //Возведение числа в степень
var A,B,C,I :integer;
Begin
write('Введите число, а затем степень через пробел:');
readln(A,B);
C := 1;
FOR I:=1 to B do begin
C := A*C;
end;
writeln('Результат: ',C);
end.
|
7.03.2012 / 19:57 | |
FlyMove Пользователь Сейчас: Offline
Регистрация: 06.01.2011
| aNNiMON, А что это? чем мой вариант не катит?
|
7.03.2012 / 20:03 | |
Az@ Пользователь
| Дарова братан . У тя в ответе не используется переменная i. И неправильно будет степень ты прост число увеличиваеш в опр. Количество раз как я понял. |
7.03.2012 / 21:05 | |
TAPAHbl4 Пользователь Сейчас: Offline
Имя: TAPAHbl4 Регистрация: 15.01.2012
| FlyMove, он слишком длинный |