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

Перевести программу,написанную на паскале,на язык си++ - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Напишите функцию, меняющую местами элементы массива http://www.cyberforum.ru/cpp-beginners/thread1071266.html
17. Напишите функцию, меняющую местами наибольший и наименьший элементы массива.
C++ Напишите функцию, рассчитывающую среднее арифметическое отрицательных элементов 16. Напишите функцию, рассчитывающую среднее арифметическое отрицательных элементов в одномерном массиве. Функция записывает результат в переменную, передаваемую по ссылке. В случае наличия отрицательных элементов в массиве функция возвращает true, в случае отсутствия - false. http://www.cyberforum.ru/cpp-beginners/thread1071265.html
C++ Напишите функцию, получающую целое число
14. Напишите функцию, получающую целое число N (> 0). Если оно является степенью числа 3, то функция возвращает true, если не является, - false.
Напишите функцию, получающую два целых числа C++
13. Напишите функцию, получающую два целых числа A и B (A < B). Функция выводит в порядке возрастания все целые числа, расположенные между A и B (включая сами числа A и B) и возвращает количество N этих чисел.
C++ Напишите функцию, определяющую количество дней в этом году http://www.cyberforum.ru/cpp-beginners/thread1071262.html
12. Дан номер года (положительное целое число). Напишите функцию, определяющую количество дней в этом году, учитывая, что обычный год насчитывает 365 дней, а високосный — 366 дней. Високосным считается год, делящийся на 4, за исключением тех годов, которые делятся на 100 и не делятся на 400 (например, годы 300, 1300 и 1900 не являются високосными, а 1200 и 2000 — являются).
C++ Напишите функцию, которая получает три переменные вещественного типа 11. Напишите функцию, которая получает три переменные вещественного типа с разными значениями: A, B, C. Если их значения упорядочены по возрастанию или убыванию, то функция удваивает их; в противном случае заменяет значение каждой переменной на ноль. подробнее

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

Перевести программу,написанную на паскале,на язык си++ - C++

14.01.2014, 17:09. Просмотров 226. Ответов 1
Метки (Все метки)

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
uses crt;
var a:array[1..2,1..100] of integer;
    m,i,j,s,mx:integer;
begin
randomize;
write('Количество столбцов матрицы m=');
read(m);
writeln('Матрица:');
for i:=1 to 2 do
 begin
  for j:=1 to m do
   begin
    a[i,j]:=random(5)+1;//введем небольшой диапазон чисел, чтоьы было несколько максимумов
    write(a[i,j]:3);
   end;
  writeln;
 end;
mx:=a[1,1];
for j:=2 to m do
if a[1,j]>mx then mx:=a[1,j];
writeln('Максимальный элемент в первой строке=',mx);
s:=0;
for j:=1 to m do
if a[1,j]=mx then s:=s+a[2,j];
write('Сумма элементов второй строки, в столбцах с максимальным=',s);
end.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru