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

Перевести из Паскаля в с++ - C++

Восстановить пароль Регистрация
 
Fox01
3 / 3 / 0
Регистрация: 04.03.2012
Сообщений: 55
24.04.2012, 15:06     Перевести из Паскаля в с++ #1
Народ помогите код переделать в с++ пожалуууууууууйста
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
var
  i, j, k: integer;
  p: boolean;
  s1, s2: string;
begin
  writeln('vvedite stroku s1');
  readln(s1);
  writeln('vvedite stroku s2');
  readln(s2);
  k := 0;
  for i := 1 to length(s1)
  do
    begin
      p := true;
      for j := 1 to length(s2)
      do
        if s2[j] <> s1[i + j - 1]
        then
          p := false;
      if p
      then
        inc(k)
    end;
  writeln(k);
  readln
end
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
24.04.2012, 15:06     Перевести из Паскаля в с++
Посмотрите здесь:

C++ перевести на c++ с паскаля
Перевести из паскаля в С C++
перевести с Паскаля в с++ C++
C++ перевести из паскаля в с++
Перевести с Паскаля на C++ C++
C++ Перевести с Паскаля на С++
C++ Перевести из паскаля на с++
C++ Перевести с Паскаля на С++

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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
softonet
 Аватар для softonet
32 / 32 / 2
Регистрация: 17.04.2011
Сообщений: 201
24.04.2012, 17:33     Перевести из Паскаля в с++ #2
Что она делает может просто задание напишешь?
Yandex
Объявления
24.04.2012, 17:33     Перевести из Паскаля в с++
Ответ Создать тему
Опции темы

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