Из Pascal в C++

@Denistrator · Регистрация: 17.06.2013

Студворк — интернет-сервис помощи студентам

Нужно с паскаля на C++ перевести вот это:

Pascal
1
2
3
4
5
6
7
8
9
10
11
var x, y:byte;
act:char;
begin
while act <> 'q' do begin
act:=readkey; 
if act='a' then begin plr:=chr(17); x:=x-1; end;
if act='d' then begin plr:=chr(16); x:=x+1; end;
if act='w' then begin plr:=chr(30); y:=y-1; end;
if act='s' then begin plr:=chr(31); y:=y+1; end;
gotoxy(x, y); write('*');
end; end.

Плз. помогите!

P.S. Для меня вся сложность в том что не могу найти аналог readkey в C++

@Denno · 17.06.2013, 19:38

Сообщение от Denistrator

не могу найти аналог readkey в C++

C++
1
std::cin.get();

@Denistrator · 17.06.2013, 19:53 **[ТС]**

Пока что я написал это:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
#include "stdafx.h"
#include <iostream>
#include <string>
#include <windows.h> 
#include <conio.h>
using namespace std;
 
void gotoxy(int xpos, int ypos)
    {
    COORD scrn;    
    HANDLE hOuput = GetStdHandle(STD_OUTPUT_HANDLE);
    scrn.X = xpos; scrn.Y = ypos;
    SetConsoleCursorPosition(hOuput,scrn);
    }   
int _tmain(int argc, _TCHAR* argv[])
{
    int x, y;
    char act;
    x=1; y=1;
    while (act!='q')
    {
    act=cin.get();
    if (act=='a'){x--;}
    if (act=='d'){x++;}
    if (act=='w'){y--;}
    if (act=='s'){y++;}
    gotoxy(x, y); cout<<"*";
    }
    getch();
return 0;
}

но все же так как надо не работает(просто выводит на экран нажатые символы)
я в C++ новичок(<недели) так что наверно вся прога не правильно написана...

Добавлено через 10 минут

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
#include "stdafx.h"
#include <iostream>
#include <string>
#include <windows.h> 
#include <conio.h>
using namespace std;
 
void gotoxy(int xpos, int ypos)
    {
    COORD scrn;    
    HANDLE hOuput = GetStdHandle(STD_OUTPUT_HANDLE);
    scrn.X = xpos; scrn.Y = ypos;
    SetConsoleCursorPosition(hOuput,scrn);
    }   
int _tmain(int argc, _TCHAR* argv[])
{
    int x, y;
    char act;
    x=1; y=1;
    act=cin.get();
    while (act!='q')
    {
     switch(act)
     {
     case 'a': {x--;}
     case 'd': {x++;}
     case 'w': {y--;}
     case 's': {y++;}
     gotoxy(x, y); cout<<"*";
     }
    }
    getch();
return 0;
}

как бы v 0.1

@Naudiz · 17.06.2013, 20:19

Denistrator, после каждого case поставьте break;

Новые блоги и статьи Все статьи Все блоги /
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Рецензия / Мнение Это мой обзор планшета X220 с точки зрения школьника. Недавно я решила попытаться уменьшить свой. . .	PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .

@Naudiz 16 / 14 / 7 Регистрация: 04.11.2011 Сообщений: 137
	17.06.2013, 20:19
	Denistrator, после каждого case поставьте break; 0