Форум программистов, компьютерный форум CyberForum.ru

С++ для начинающих

Войти
Регистрация
Восстановить пароль
 
uNsLide
0 / 0 / 0
Регистрация: 15.04.2009
Сообщений: 15
#1

Перенос кода из Pas в С/С++ - C++

20.05.2009, 17:04. Просмотров 482. Ответов 4
Метки нет (Все метки)

Здравствуйте. Есть программа на паскале, которая случайным образом выдает 3 слова из текстового файла без повторения

Pascal
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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
uses Crt;
 
var a : array [1..100] of string;
 
    f : text;
 
    S : string;
 
    j,strv : integer;
 
x1,x2,x3 : integer;
 
 
 
begin
 
clrscr;
 
writeln;
 
writeln('Version - 1.0.');
 
Randomize;
 
Assign(F,'mapsgen.txt');
 
Reset(F); J:=1;
 
 
 
While not eof(f) do begin
 
Readln(F,a[j]); inc(strv);  inc(j); end;
 
Close(F);
 
Repeat
 
x1 := Random(strv); x2 := Random(strv); x3 := Random(strv);
 
Until (x1<>x2) and (x1<>x3) and (x2<>x3) and (x1<>0) and (x2<>0) and (x3<>0);
 
{Writeln('In these file there are ',strv,' strokes');} Writeln;
 
writeln('---------------------------------------------------------');Writeln('The 1st word is ',a[x1]);
 
writeln('---------------------------------------------------------');Writeln('The 2nd word is ',a[x2]);
 
writeln('---------------------------------------------------------');Writeln('The 3rd word is ',a[x3]);
 
writeln('---------------------------------------------------------');
 
Readln;
 
end.
Помогите пожалуйста переписать код этой проги для С или С++. Заранее благодарю
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
20.05.2009, 17:04     Перенос кода из Pas в С/С++
Посмотрите здесь:

Перенос кода - C++
Подскажите пожалуйста в чём проблема? имею код: func.cpp #ifndef LAB4_H #define LAB4_H #include &quot;stdafx.h&quot; ...

перенос кода в С++ - C++
var e,x,t,s:real; n:integer; begin repeat write('|x|&lt;1 x='); read(x); until abs(x)&lt;1; repeat write('0&lt;e&lt;1 e='); ...

Перенос кода на C++11 - C++
Здравствуйте! Я столкнулся со следующей проблемой: есть проект под Android, большая часть которого написана на С++. В команде...

Перенос кода с java на с++ - C++
Всем привет я навичок помогите перевести этот код с java на с++ import java.util.Random; public class Runner { ...

Перенос кода на 64-битную платформу - C++
Пытаюсь разобраться с проблемами на переноса кода на 64битную платформу. В сети встретил вот такую конструкцию. #ifdef _WIN64 ...

Перенос кода с Паскаля на Си. Часть 1 - C++
Есть задача, для решения которой написано консольное приложение на Pascal. Авторов было несколько и они не были программистами, откуда...

Перевести коды из Pas в C++ - C++
{осуществить циклический сдвиг элементов массива, на k позиций вправо } program li; uses crt; var a:array of integer; ...

Открыть файл .pas как текстовый - C++
Как можно считать файл *.pas или *.cpp как текстовый ??

Создание кода программы с нуля!! создание кода C++ - C++
ВОТ УСЛОВИЕ : Для данного вещественного x,a,b,c найти значение следующей функции f,принимающей вещественное задания: ...

перенос курсора - C++
fstream ifile; string s; ifile.open(NameFile, :: ios::in); int cur = ifile.tellp(); ifile.seekp(cur ,ios::beg); ifile &gt;&gt;s; ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
alex_x_x
бжни
2445 / 1650 / 84
Регистрация: 14.05.2009
Сообщений: 7,162
20.05.2009, 18:37     Перенос кода из Pas в С/С++ #2
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
35
#include <stdio.h>
#include <conio.h>
#include <time.h>
#include <stdlib.h>
 
char a[100][255];
FILE *f;
char *S;
int j,strv=0,x1,x2,x3;
  
int main(){
    clrscr();
    printf("\nVersion - 1.0.\n");
    srand(time(NULL));
    f=fopen("mapsgen.txt","r");
    j=0;
    while(!feof(f)){
        fgets(a[j],255,f);
        strv++;
        j++;
    }
    fclose(f);
    do{
        x1 = rand()*strv/RAND_MAX;
        x2 = rand()*strv/RAND_MAX;
        x3 = rand()*strv/RAND_MAX;
    }while((x1!=x2) && (x1!=x3) && (x2!=x3) && (x1!=0) && (x2!=0) && (x3!=0));
        printf("In these file there are %d strokes",strv);
    printf("\n---------------------------------------------------------\nThe 1st word is %d",a[x1]);
    printf("\n---------------------------------------------------------\nThe 2nd word is %d",a[x2]);
    printf("\n---------------------------------------------------------\nThe 3rd word is %d",a[x3]);
    printf("\n---------------------------------------------------------\n");
    getch();
    return 0;
}
Somebody
2786 / 1600 / 145
Регистрация: 03.12.2007
Сообщений: 4,189
Завершенные тесты: 1
20.05.2009, 21:27     Перенос кода из Pas в С/С++ #3
Там в printf не %d, а %s
alex_x_x
бжни
2445 / 1650 / 84
Регистрация: 14.05.2009
Сообщений: 7,162
20.05.2009, 22:36     Перенос кода из Pas в С/С++ #4
Цитата Сообщение от Somebody Посмотреть сообщение
Там в printf не %d, а %s
дада, точно
uNsLide
0 / 0 / 0
Регистрация: 15.04.2009
Сообщений: 15
21.05.2009, 17:29  [ТС]     Перенос кода из Pas в С/С++ #5
Цитата Сообщение от Somebody Посмотреть сообщение
Там в printf не %d, а %s
Согласен. Всем огромное спасибо
Yandex
Объявления
21.05.2009, 17:29     Перенос кода из Pas в С/С++
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru