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

Перевести c Pascal в C++ - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Преобразовать строку таким образом, чтобы все слова в ней были напечатаны наоборот http://www.cyberforum.ru/cpp-beginners/thread897199.html
Помогите пожалуйста исправить программу Преобразовать строку таким образом, чтобы все слова в ней были напечатаны наоборот. Переворачивает всю строку, а нужно каждое слово в строке #include...
C++ Реализовать с использованием массива двунаправленное кольцо (программа работает не правильно) Подскажите. что не так в программе? работает не совсем правильно 1) Реализовать с использованием массива двунаправленное кольцо (просмотр возможен в обе стороны, от последнего элемента можно... http://www.cyberforum.ru/cpp-beginners/thread897180.html
Определенный интеграл C++
Необходимо численным методом найти приближенное значение определенного интеграла(скинул задание с методички на всякий). Вот прога: #include<stdio.h> #include<conio.h> #include<math.h> void main()...
Дана строка символов до точки. Составить программу, проверяющую, является ли данная строка палиндромом, т. е. читается ли она слева направо и справа н C++
Дана строка символов до точки. Составить программу, проверяющую, является ли данная строка палиндромом, т. е. читается ли она слева направо и справа налево одинаково.
C++ Разложение в степенной ряд (программа работает не правильно) http://www.cyberforum.ru/cpp-beginners/thread897176.html
Помогите пожалуйста исправить программу, чтобы работала правильно Для х изменяющегося от a до b с шагом (b-a)/k, где (k=10), вычислить функцию f(x), используя ее разложение в степенной ряд в двух...
C++ написать код для создания бмп файла заданного размера си++ как написать код для создания бмп файла,размеры задаем сами.в последующем применяем для его масштабирования подробнее

Показать сообщение отдельно
Diman_
0 / 0 / 0
Регистрация: 07.06.2013
Сообщений: 58

Перевести c Pascal в C++ - C++

10.06.2013, 11:26. Просмотров 263. Ответов 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
uses crt;
var st:string;
k,i:integer;f:boolean;
 
begin
 clrscr;
 write('-> ');
 readln(st);
 k:=0;
 f:=true;
 for i:=1 to length(st) do
 begin
 if k<=0 then
 begin
  f:=false;
  break;
 end else case st[i] of
 '(': inc(k);
 ')': dec(k);
 end;
 end;
 if f and (k=0) then writeln('Скобки расставлены верно') else writeln('Скобки расставлены неверно');
 readln;
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru