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

переведите на С++ - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Создайте массив int A [n] [n], и заполните его по следующему правилу: http://www.cyberforum.ru/cpp-beginners/thread904560.html
дано число n. Создайте массив int A , и заполните его по следующему правилу: Числа на диагонали, идущей из правого верхнего в левый нижний угол равны 1. Числа стоящие выше этой диагонали равны 0....
C++ переведите на С++ 2 переведите на С++ uses crt; var a : string; i,s,c : longint; begin clrscr; write('Введите текст '); readln(a); write('Стоимость одного слова '); http://www.cyberforum.ru/cpp-beginners/thread904558.html
блок схема C++
#include <stdio.h> #include <stdlib.h> #include <time.h> #include <conio.h> #define N 4 void InsertSort(int a, int n) { int buf, i, j; for (i = 1; i < n; i++)
Установка компилятора под Windows 7 C++
Я совсем новенькая в C++, что-то как-то писать умею только на Паскале Т_Т Но я бы очень хотела научиться и в моей голове уже есть мини проект. Но пока что не об этом. Свои самые первые шаги в C++ я...
C++ Нужно соединить две функции в одну http://www.cyberforum.ru/cpp-beginners/thread904545.html
Моя проблема: есть две функции для подсчета числителя и знаменателя их нужно соединить в одну, что бы она могла подсчитывать и числитель и знаменатель. Вот мой код: #include <iostream>...
C++ Перегрузка оператора "+" с шаблонами нужно написать перегрузку оператора +, который объединяет 2 массива структур в один. допустим, есть вот такая вот структура struct Stud1 { char name ; char addr ; double price; friend... подробнее

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

переведите на С++ - C++

17.06.2013, 18:15. Просмотров 225. Ответов 2
Метки (Все метки)

переведите на С++

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
Var s,p:string; b:char; i:integer;
Begin
Write('Input text:'); Readln(s);
Write('Input letter:'); Readln(b);{ввод буквы}
For i:=1 to length(s) do
 If not(s[i]=' ') and not(i=length(s))then p:=p+s[i]{собираем слова посимвольно}
 Else
  Begin
   If i=length(s) then p:=p+s[i];
   If upcase(p[1])=upcase(b) then Writeln(p);{если буквы сходятся, то выводим слово}
   p:='';
  End;
End.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru