ПОМОГИТЕ С НАПИСАНИЕМ ИГРЫ |
ПОМОГИТЕ С НАПИСАНИЕМ ИГРЫ |
alex 10 |
12.12.2014 19:09
Сообщение
#1
|
Новичок Группа: Пользователи Сообщений: 22 Пол: Мужской Реальное имя: Алексей Репутация: 0 |
помогите пожалуйста!! на паскале програмировать начал недавно. Пробовал писать графические игры-но ничего не получилось!
|
Федосеев Павел |
12.12.2014 21:06
Сообщение
#2
|
Бывалый Группа: Пользователи Сообщений: 298 Пол: Мужской Реальное имя: Федосеев Павел Репутация: 8 |
Тут народ даёт хорошие советы.
Я когда-то пробовал текстовый Сокобан. А самой первой была попытка клонировать с Рапиры (АГАТ) на BASIC (PC) текстовую игрушку "Королевство Зерна". Мы с одноклассником её за один вечер смогли почти закончить. Вся прелесть была в том, что тогда каждый BASIC - свой непохожий диалект, а IBM PC мы видели почти впервые и Internet отсутствовал. Если оператор не компилировался - мы перебирали варианты его использования (воспользоваться справкой, почему-то, не догадались). Но силы нас переполняли - мы уже 3 или 4 недели в школе и на УПК учили разные BASIC'и! Попробуй с чего-то текстового. Дерзай! |
alex 10 |
18.12.2014 10:54
Сообщение
#3
|
Новичок Группа: Пользователи Сообщений: 22 Пол: Мужской Реальное имя: Алексей Репутация: 0 |
Спасибо за совет!
|
alex 10 |
18.12.2014 11:27
Сообщение
#4
|
Новичок Группа: Пользователи Сообщений: 22 Пол: Мужской Реальное имя: Алексей Репутация: 0 |
ура получилось!!!
Код uses crt; var a,d,g:integer; begin clrscr; a:=1; d:=2; g:=3; while g=a+d do begin randomize; a:=random(10); d:=random(10); write(a,'+',d); readln(g); end; end. Добавлено через 7 мин. маленький upgrade Код uses crt; var a,d,g,ff:integer; begin clrscr; writeln('до какого числа можно мне выдавать числа?'); readln(ff); a:=1; d:=2; g:=3; while g=a+d do begin randomize; a:=random(ff); d:=random(ff); write(a,'+',d); readln(g); end; end. |
Текстовая версия | 1.11.2024 3:42 |