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

Перевод программы на С++ с Паскаля - C++

Восстановить пароль Регистрация
 
zhannaa
Нарушитель
1 / 1 / 0
Регистрация: 25.03.2016
Сообщений: 34
01.06.2016, 16:02     Перевод программы на С++ с Паскаля #1
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
var
    str: string;
    len, count, flag, i, n: byte;
 
begin
    writeln('String: '); readln(str);
    write('Word №: '); readln(n);
    len := length(str);
    count := 0;
    flag := 0;
    for i:=1 to len do begin
        if (str[i] <> ' ') and (flag = 0) then begin
            count := count + 1;
            flag := 1;
            if count = n then break; 
        end;
        if str[i] = ' ' then flag := 0;
    end;
 
    writeln(str[i]);
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
01.06.2016, 16:02     Перевод программы на С++ с Паскаля
Посмотрите здесь:

C++ Перевод программы на С++ с Паскаля
Перевод программы на С++ с Паскаля C++
C++ Перевод с Паскаля на С++
Перевод из Паскаля в C++ C++
C++ Перевод с паскаля на с++
перевод программы из Паскаля в С++ C++
Перевод программы на С++ с Паскаля C++

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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

Текущее время: 03:20. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru