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

количество глассных и согласных и сравнить каких больше - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Линейный динамический список http://www.cyberforum.ru/cpp-beginners/thread129082.html
1. Напишите программу, создающую линейный динамический список, указанный в задании. Значения элементов вводятся с консоли. Вам понадобятся функции «создать», «добавить», «удалить список», «просмотр...
C++ Создать одномерный массив, содержащий индексы элементов матрицы Помогите пожалуйста решить Дана матрица 6х8 целого типа. Создать одномерный массив, содержащий индексы элементов матрицы, меньших числа, введенного с клавиатуры. http://www.cyberforum.ru/cpp-beginners/thread129041.html
C++ Перемещение курсора в консоли
Помогите реализовать новичку перемещение курсора в консоли.Т.е. есть меню например Создать базу Редактировать Удалить И нужно передвигатся по нему курсором
Выполнить сортировку строк файла в обратном лексикографическом порядке C++
Имеется текстовый файл, содержащий не более 100 строк. Выполнить сортировку строк файла в обратном лексикографическом порядке. Результаты сортировки записать в новый файл. Помогите пожалуйста!))...
C++ программа для шифрования и расшифровки текстовых файлов http://www.cyberforum.ru/cpp-beginners/thread129026.html
программа для шифрования и расшифровки текстовых файлов.
C++ Графы.Матрица смежности.Ребра связности. Уважаемые программисты! Мне нужно найти минимальное количество ребер, удаление которых превратит связный граф в несвязный. После ввода матрицы смежности я определяю компоненты связности. Затем, по... подробнее

Показать сообщение отдельно
SERGEY199100
20 / 20 / 0
Регистрация: 29.10.2009
Сообщений: 430

количество глассных и согласных и сравнить каких больше - C++

13.05.2010, 18:00. Просмотров 460. Ответов 6
Метки (Все метки)

Добрый день, есть програма на паскале, которая считает количество глассных и согласных и сравнивает каких больше

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
uses crt;
const
sogl = ['B'..'D','F'..'H','J'..'N','P'..'T','V'..'Z'];
glas = ['A','E','I','O','U'];
var
sgl,gl,i:byte;
stroka:string;
begin
clrscr;
writeln('Vvedite sroku'); readln(stroka);
for i:=1 to length(stroka) do begin
if upcase(stroka[i]) in glas then inc(gl) else
if upcase(stroka[i]) in sogl then inc(sgl);
end;
if gl>sgl then writeln('Glasnih bolshe soglasnih') else
if gl<sgl then writeln('Soglasnih bolshe glasnih') else
writeln('Glasnih i soglasnih porovnu');
readkey;
end.
Памогите ее переделать под Си ++ для DOS пожалуйста.

Добавлено через 4 часа 58 минут
Помогите плиз, к завтрашнему дню надо срочно
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru