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

Перевести эту программу на С++ с паскаля - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Дописать код http://www.cyberforum.ru/cpp-beginners/thread148012.html
Хочу, чтобы программа считала: 1) сумму элементов в тех строках, которые не содержат отрицательных элементов 2) минимум среди сумм элементов диагоналей, параллельных главной диагонали матрицы. это пока что сам сделал, добавьте пожалуйста 1 и 2 #include <iostream.h> #include <stdlib.h> int main()
C++ Создаю форму. Где разместить функциональную часть Здравствуйте, вопрос и состоит в том, где правильно размещать функциональную часть. В консоли все понятно: объявления функций и глобальных переменных до main'а, в main'е локальные переменные. А где мне объявить и определить какую-нибудь функцию, если я создаю форму. В *.cpp? В *.h? В отдельном cpp-файле? Среда программирования: C++Builder 2010. http://www.cyberforum.ru/cpp-beginners/thread147986.html
Работа со строками C++
Помогите с прогой на С Функция доводит длину строки до заданной, вставляя пробелы между словами
Последовательность C++
Помогите с кодом на С Вводится последовательность ненулевых чисел, 0 — конец последовательности. Определить является ли последовательность строго возрастающей
C++ Прога с масивом http://www.cyberforum.ru/cpp-beginners/thread147974.html
Подскажите код программы на С Во всех последовательностях положительных чисел ограничить снизу значения тех элементов, значения которых меньше среднего для этой последовательности, Размерность 200, диапозон значений -100 до 100
C++ Написать программу для разбиения текста на строки вдлину не более 50 символов. Перенесение слов на новую строку использовать на месте пропуска. Написать программу для разбиения текста на строки вдлину не более 50 символов. Перенесение слов на новую строку использовать на месте пропуска. подробнее

Показать сообщение отдельно
DIDO
0 / 0 / 0
Регистрация: 22.06.2009
Сообщений: 27
21.06.2010, 15:04  [ТС]     Перевести эту программу на С++ с паскаля
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
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
Program programma_6;
const nmax=20;
var a:array[1..nmax,1..nmax] of integer;
m,n,i,j,ks,l:byte;
sm,b:integer;
f:boolean;
begin
randomize;
repeat
write('kollichestvo strok do ',nmax,' n=');
readln(n);
until n in [1..nmax];
repeat
write('kollichestvo strok do ',nmax,' m=');
readln(m);
until m in [1..nmax];
for i:=1 to n do
begin
sm:=0;
for j:=1 to m do
begin
a[i,j]:=random(10)-4;
sm:=sm+a[i,j];
a[i,m+1]:=sm;
end;
end;
writeln('Isxodnii massiv:');
writeln('Summa'm*4+6));
for i:=1 to n do
begin
for j:=1 to m+1 do
if j=m+1 then write(a[i,j]:6)
else write(a[i,j]:4);
writeln;
end;
writeln;
ks:=0;
for j:=1 to m do
begin
f:=true;
i:=1;
while f and(i<=n)do
begin
if a[i,j]=0 then f:=false
else i:=i+1;
end;
if f then ks:=ks+1;
end;
writeln('Kollichestvo stolbcov bez nolei=',ks);
write('Press Enter...');
readln;
for i:=1 to n-1 do
for l:=i+1 to n do
if a[i,m+1]>a[l,m+1] then
for j:=1 to m+1 do
begin
b:=a[i,j];
a[i,j]:=a[l,j];
a[l,j]:=b;
end;
writeln('Stroki po neybivaniu summ:');
writeln('Summa'm*4+6));
for i:=1 to n do
begin
for j:=1 to m+1 do
if j=m+1 then write(a[i,j]:6)
else write(a[i,j]:4);
writeln;
end;
readln
end.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru