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

c turbo на C++ - C++

Восстановить пароль Регистрация
 
Brahmanchik
0 / 0 / 0
Регистрация: 20.01.2012
Сообщений: 19
07.06.2012, 23:28     c turbo на C++ #1
1. Дан целочисленный массив A(n) с элементами, сгенерированными случайными числами в диапазоне (-20, 20). Требуется: Отсортировать по убыванию положительные элементы массива методом выбора.
2. Дана фраза, в которой слова разделены одним пробелом, а сама фраза заканчивается точкой. Требуется:Определить, сколько в ней наречий и однобуквенных местоимений
КАК БУДЕТ ВЫГЛЯДИТЬ КОД TURBO PASCALA РАСПОЛОЖЕНЫЙ НИЖЕ В C++
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
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
const
nmax=100;
type
Tarr=array[1..nmax] of integer;
var
a:Tarr;
i,j,buf,n:integer;
begin
randomize;
repeat
write('Razmer massiva, ne bolee ',nmax,': ');
readln(n);
until n in [1..nmax];
writeln('Ishodniy massiv:');
for i:=1 to n do
begin
a[i]:=-20+random(41);
write(a[i]:4);
end;
writeln;
for i:=1 to n-1 do
if a[i]>0 then
for j:=i+1 to n do
if (a[j]>0) and (a[j]>a[i]) then
begin
buf:=a[i];
a[i]:=a[j];
a[j]:=buf;
end;
writeln('Poluchenniy massiv:');
for i:=1 to n do
write(a[i]:4);
writeln;
end.
А ВОТ КОД ДЛЯ ВТОРОЙ ЗАДАЧКИ
var i,res1,res2:integer;
s:string;
begin
read(s);
if (s[1]<>' ') and (s[2]=' ') then res2:=res2+1;
if (s[length(s)-1]<>' ') and (s[length(s)-2]=' ') then res2:=res2+1;
if (s[length(s)-1]='о') and (s[length(s)-2]<>' ') then res1:=res1+1;
if length(s)>5 then
for i:=3 to length(s)-3 do
if (s[i-1]=' ') and (s[i+1]=' ') then res2:=res2+1;
if length(s)>6 then
for i:=2 to length(s)-3 do
if (s[i-1]<>' ') and (s[i+1]=' ') and (s[i]='о') then res1:=res1+1;
writeln('местоимений-',res2,' наречий-',res1);
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
07.06.2012, 23:28     c turbo на C++
Посмотрите здесь:

TURBO C++ C++
C++ Turbo C++
C++ Turbo c
Dev-C++ и Turbo C++ C++
Ошибки Turbo С++ C++
C++ Из Turbo Pascal в C++
C++ turbo c++...
Turbo C++ C++

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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

Текущее время: 14:56. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru