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

из паскаля в с++ - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Что тут требуется? http://www.cyberforum.ru/cpp-beginners/thread885139.html
Добрый вечер. Объясните, пожалуйста, что требуется в данной задаче простым языком! В С++ вообще не шарю, так как не преподавали, но требуют с нас.
C++ Квадратная матрица (заполнить и вывести на экран разными цветами разные цифры) народ помогите тут матрица квадратная 17:17 как ее заполнить и вивести на екран разными цветами разные цифри ?? по диагонали она 1 2 3 4 5 6 7 8 9 8 7 6 5 4 3 2 1 http://www.cyberforum.ru/cpp-beginners/thread885138.html
Структуры. Запись в массив (Описать структуру с именем ZNAK) C++
Условие задачи: 1. Описать структуру с именем ZNAK, содержащую следующие поля: • Фамилия; • Знак зодиака; • Дата рождения (массив из трех чисел). Написать программу, выполняющую следующие действия: • Чтение данных из файла и запись их в массив, состоящий из восьми элементов типа ZNAK; • Сортировка данных по датам рождения; • Вывод на экран информации о человеке, чья фамилия введена с...
С++ Выполнить поиск заданного элемента методом однородного бинарного поиска C++
Приветствую друзья программисты. Нужна ваша неотъемлемая помощь. В отсортированном одномерном массиве X(100)выполнить поиск заданного элемента методом однородного бинарного поиска. Буду очень признателен за вашу помощь. Нужно срочно.:cry: Добавлено через 17 часов 59 минут up! Добавлено через 6 часов 4 минуты up!
C++ Выполнить сортировку одномерного массива методом вставки в список с вычислением адреса http://www.cyberforum.ru/cpp-beginners/thread885098.html
Приветствую друзья программисты. Нужна ваша неотъемлемая помощь. Выполнить сортировку одномерного массива X(100) методом вставки в список с вычислением адреса. Буду очень признателен за вашу помощь. Нужно срочно.:cry: Добавлено через 18 часов 5 минут up! Добавлено через 6 часов 4 минуты up!
C++ Не хочет считывать второй раз строку Здравствуйте, пытаюсь работать с базой данных (в виде *.txt). Мои действия: 1) создаем базу данных, название вводим без ".txt" (1) 2) добавление новой записи в файл, предварительно обработав её (3) 2.1) Вводим имя существующей базы данных (которую мы создали на первом шаге, но уже с ".txt" 2.2) Вводим строчку в указанном формате. Затем она должна передаваться в функцию newrecord, где идет её... подробнее

Показать сообщение отдельно
javelin
0 / 0 / 0
Регистрация: 30.05.2013
Сообщений: 20
30.05.2013, 16:44     из паскаля в с++
помогите перевести в с++ срочно нужно
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
Uses crt;
Function CSubs(sub,s: String): Byte;
begin
  If Pos(sub,s)=0 Then
  CSubs:=0
  Else
  CSubs:=1+CSubs(sub,Copy(s,Pos(sub,s)+Length(sub),Length(s)));
end;
Var
  f: File of Char;
  i,k: Integer;
  s,str: String;
  ch: Char;
BEGIN
Clrscr;
Assign(f,'fail.dat');
Rewrite(f);
Write('Vvedite stroku simvolov: '); Readln(s);
For i:=1 to Length(s) do
Write(f,s[i]);
ch:='E'; Write(f,ch);
ch:='N'; Write(f,ch);
ch:='D'; Write(f,ch);
Reset(f);
For i:=0 to Filesize(f)-1 do
begin
  Seek(f,i);
  Read(f,ch);
  str:=str+ch;
end;
Writeln('Poluchennaya stroka: ');
Writeln(str);
Writeln('Kolichestvo "AB" = ',CSubs('AB',str));
If Pos('abcdef',str)=0 Then
Writeln('abcdef ne vhodit')
Else Writeln('abcdef vhodit');
Close(f);
Readln
END.
Добавлено через 15 минут
уже не нужно
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 04:36. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru