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

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

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

Перевести с Pascal на Turbo C - C++

21.05.2010, 16:06. Просмотров 277. Ответов 0
Метки нет (Все метки)

Перевести с Pascal на Turbo C

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
program zadacha_10;
 uses crt;
  var
   f: text;
   s,s1,s2: string;
   i,l,l1: integer;
  begin
   clrscr;
    writeln('Vvedite imya faila');
    readln(s);
    assign(f,s);
    writeln('vvedite frazu dlya poiska');
    readln(s1);
    l1:=length(s1);
    writeln;
    writeln('         Stroki s zadannoi frazoi      ');
    writeln;
    {$I-}
    reset(f);
    {$I+}
    while not eof(f) do
     begin
      readln(f,s2);
      l:= length(s2);
      for i:=1 to l do
       begin
       if copy(s2,i,l1)=s1  then
        begin
         writeln (s2);
        end;
      end;
   end;
   readln;
   close(f);
   end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.05.2010, 16:06     Перевести с Pascal на Turbo C
Посмотрите здесь:

Перевести с pascal C++
C++ Из Turbo Pascal в C++
C++ Из Turbo pascal в С++
Из Turbo Pascal в C++ C++
C++ Как программу на Turbo Pascal перевести на C++?Выручите)
C++ Перевести с Pascal на C++
C++ Перевести с pascal в C++
Перевести из Turbo Pascal в C++ C++
C++ Перевод программы с Turbo Pascal на С++
C++ Перевести из Turbo Pascal в C++
Перевести задачи из Dev C++ на Turbo C++ C++

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

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

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