Форум программистов, компьютерный форум, киберфорум
Наши страницы

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

Войти
Регистрация
Восстановить пароль
 
[Iluminate]
3 / 3 / 0
Регистрация: 28.11.2011
Сообщений: 34
#1

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

22.12.2011, 19:35. Просмотров 357. Ответов 4
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var s:string; n,m:byte;
begin
writeln('Введите строку:');
readln(s);
writeln('Введите начальную позицию удаления символов:');
readln(m);
writeln('Введите колличество удаляемых символов:');
readln(n);
delete(s,m,n);
writeln('Почучилась строка:',s); {вместо "Почучилась строка" можете своё придумать}
readln;
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
22.12.2011, 19:35
Здравствуйте! Я подобрал для вас темы с ответами на вопрос помогите перевод с паскаля на С (C++):

Перевод из Паскаля в С++ - C++
const RusLit = ; EngLit = ; var Str: string; procedure StringClear(var Str: string); var ResStr: string; i:...

Перевод из Паскаля в Си++ - C++
program p1; var a,k:string; mas:array of string; b,c,i,nu:integer; begin nu:= 0; i:=1; readln (a); for i:=1...

Перевод с паскаля на С++ - C++
const BASE16 = 16; var HexValue : string; Ostatok: Integer; Chastnoe: Integer; begin HexValue := ''; write( 'Введите целое...

Перевод с паскаля на си - C++
Ребят помогите поджалуйста с переводом! const r=10; n=100; type mas=array of byte; var i,j,a:integer; ...

Перевод с Паскаля на си++ - C++
Помогите перевести на си++. uses crt; const gl=; var s:string; i:byte; begin clrscr; writeln('Введите текст из...

Перевод с Паскаля на C++ - C++
Помогите пожалуйста перевести это код на C++!!!!!! Uses crt,graph; label 2,3,4; Var dr,md,i,k:integer; d:char; procedure dogd; ...

4
Петррр
5970 / 3407 / 337
Регистрация: 28.10.2010
Сообщений: 5,926
22.12.2011, 19:48 #2
C
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
#include <stdio.h>
#include <string.h>
 
int main(void)
{
    char ch[255];
    int len;
    signed int begin_pos, count_symbols;
    printf("Enter string: ");
    fgets(ch, 255, stdin);
    len = strlen(ch);
    if (strchr(ch, '\n'))
        ch[--len] = 0;
    printf("Begin position: ");
    scanf("%d", &begin_pos);
    printf("Count: ");
    scanf("%d", &count_symbols);
    if (begin_pos + count_symbols > len)
        printf("Can not erase");
    else
    {
        memmove(ch + begin_pos, ch + begin_pos + count_symbols, (len - begin_pos) * sizeof(char));
        printf("Result: %s\n", ch);
    }
    return 0;
}
0
[Iluminate]
3 / 3 / 0
Регистрация: 28.11.2011
Сообщений: 34
22.12.2011, 20:06  [ТС] #3
ошибку выдает
0
Миниатюры
помогите перевод с паскаля на С  
Петррр
5970 / 3407 / 337
Регистрация: 28.10.2010
Сообщений: 5,926
22.12.2011, 20:18 #4
помогите перевод с паскаля на С
1
[Iluminate]
3 / 3 / 0
Регистрация: 28.11.2011
Сообщений: 34
22.12.2011, 20:32  [ТС] #5
спасибо!)
это что то со студией...
0
22.12.2011, 20:32
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
22.12.2011, 20:32
Привет! Вот еще темы с ответами:

Перевод с паскаля на С++ - C++
Здравствуйте. Помогите,пожалуйста,перевести код на С++. const n = 67; var matrix: array of integer; i,p,q:integer; ...

Перевод из Паскаля в C++ - C++
Переведите программу из Паскаля в С++, пожалусйта Вот код : const nmax=100; var a: array of integer; i,j,n,m,min:...

Перевод с Паскаля на С++ - C++
Не могу ни как перевести полностью вот этот кусок кода на Паскале на си++ function h(var key: TKey): integer; {Вычисление хеш-функции} ...

Перевод из паскаля в с ++ - C++
Ребят помогите перевести в с ++ var p:array of integer; c,c1:char; i,j,N,K:integer; name:string; time1,time2:integer; ...


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

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

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