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

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

Войти
Регистрация
Восстановить пароль
 
AlexTS
0 / 0 / 0
Регистрация: 20.04.2013
Сообщений: 20
#1

Перевести с Паскаля в С++ - C++

19.06.2013, 10:23. Просмотров 187. Ответов 0
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var
  str: string;
  i,k: integer;
begin
  write('Введите строку: ');
  readln(str);
  for i:=1 to length(str) do
    if str[i] in ['A','a'] then 
      k:=k+1;
  writeln('В строке ',k,' латинских букв "а"');
  readln;
end.
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.06.2013, 10:23
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Перевести с Паскаля в С++ (C++):

Перевести из паскаля в c++ - C++
собственно вот паскалевский код, тут через файлы. На с++ надо через ввод/вывод. var N:integer; E:integer; En1,En2:integer; ...

Перевести с Паскаля на Си - C++
Структура элемента массива работник: фамилия, число, месяц и год рождения, пол. определить: ─ фамилия самого старшего мужчины; ─...

перевести в си++ из паскаля - C++
var n:longint; i,c:integer; s:string; A:array of boolean; begin write('Введите N: '); readln(n); str(n,s); ...

перевести на c++ с паскаля - C++
переведите пожалуйста как написать эти строчки на с++ for i:=1 to Length(s) do for j:=length(sl) downto 1 do Добавлено...

Перевести из Паскаля в с++ - C++
Народ помогите код переделать в с++ пожалуууууууууйста var i, j, k: integer; p: boolean; s1, s2: string; begin ...

Перевести с Паскаля на С++ - C++
uses crt; var n,k:byte; p,s:longint; begin clrscr; write('Введите произведение нескольких первых нечетных натуральных чисел...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
19.06.2013, 10:23
Привет! Вот еще темы с ответами:

Перевести с паскаля на С++ - C++
Program p1; Var x,i,n:integer; Begin Write ('n= '); Read (n); x:=10; i:=0; repeat if (n div x) <> 0 then...

Перевести с Паскаля на С++ - C++
Здравствуйте! Можете помочь, мне надо перевести код с Паскаля на С++ (код паскаля на фото). Вот что получилось у меня. Но код не...

Перевести из паскаля в с++ - C++
var a, i, b: integer; begin read(a); b := 0; for i := 1 to a do if a mod i = 0 then b := b + 1; ...

C Паскаля перевести в С++ - C++
Дана матрица размера M x N. Удалить столбец, содержащий максимальный элемент матрицы. program Matrix64; var ...


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

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

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