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

Переписать из Паскаля в С++(считывание и запись в файл) - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ В двумерном массиве подсчитать http://www.cyberforum.ru/cpp-beginners/thread584432.html
Для каждой строки в двумерном массиве подсчитать количество положительных элементов и записать данные в новый массив. Помогите плз, а то в голову ничего не лезет!( (Желательно как можно проще)
C++ Улитка.Матрицу M (m,n) заполнить натуральными числами от 1 до m*n по спирали, начинающей в левом верх Помогите пожалуйста решить задачу по BORLAND С++ Улитка.Матрицу M (m,n) заполнить натуральными числами от 1 до m*n по спирали, начинающей в левом верхнем углу и закрученной на часовой стрелке. http://www.cyberforum.ru/cpp-beginners/thread584429.html
построить результат сглаживания заданной вещественной матрицы C++
Здравствуйте! пожалуйста, кто-нибудь помогите с задачкой
Ошибка компиляции программы C++
Всем доброго вечера. Не получается запустить программу, в чем может быть дело ? Компилятор Турбо Си++ 3.0 #include <iostream.h> template < typename T > T max( T a, T b ) { return ( ( a > b ) ? ( a ) : ( b ) ); }
C++ Переменная-счетчик http://www.cyberforum.ru/cpp-beginners/thread584421.html
Как в файл записать переменную счетчик, чтобы при выходе из программы она сохраняла свое значение и могла изменяться и вновь записывать в файл? Добавлено через 18 секунд Ооочень нужно=)
C++ Определить: количество цифр в тексте #include <stdio.h> main() { char s; // текущий символ текста char prs; // предыдущий символ short net=1; // признак, имеется ли "BA" в тексте // net=1, если "BA" нет // net=0, если "BA" есть printf ("\nVvedite text.\n"); s=getchar(); подробнее

Показать сообщение отдельно
Ascent
0 / 0 / 0
Регистрация: 28.01.2012
Сообщений: 9
23.05.2012, 18:15     Переписать из Паскаля в С++(считывание и запись в файл)
Имеется программа такого вида

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
uses crt;
var f,g: text;
    s,sp: string;
    et,i: byte;
begin
assign(f,'C:\in.txt');
assign(g,'C:\out.txt');
reset(f);
rewrite(g);
while (not(eof(f))) and (et=0) do
      begin
      readln(f,s);
      if pos('.',s)<>0 then
         begin
         inc(et);
         delete(s,pos('.',s),length(s)-pos('.',s)+1);
         end;
      repeat
      if length(s)<=20 then
         begin
         write(g,s);
         for i:=1 to 20-length(s) do
             write(g,'*');
         writeln(g);
         s:='';
         end else
         begin
         sp:=copy(s,1,20);
         writeln(g,sp);
         delete(s,1,20);
         end;
      until s='';
      end;
close(f);
close(g);
end.
Её нужно перевести в C++, но я сам на си ещё не разу не программировал. На паскале я пару задач сделал сам, эту предоставленную помогли сделать тут на форуме. Как оказалось её как раз надо переписать под си а остальные оставить на паскале...незадача.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 02:27. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru