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

Пожалуйста, переведите с Pascal на C++ - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Как объединить с++ и sql server http://www.cyberforum.ru/cpp-beginners/thread1203342.html
Ребят скажи пожалуйста как объединить с++ и sql server. Сделал программу и бд, а как все это объединить не могу разобраться
C++ Нужны задачи для их решения Здравствуйте. Нужны задачи для закрепления изученного материала. Что интересует(с чем я могу работать(база)): "напечатать", объявление переменных, работа с cout, sin, endl, различные... http://www.cyberforum.ru/cpp-beginners/thread1203329.html
Переделать scanf, printf в cin, cout C++
Как в этом коде заменить scanf, printf на cin, cout. А FILE * f = fopen изменить на ifstream in("INPUT.TXT"); ofstream out("OUTPUT.TXT"); используя только библиотеку #include <fstream>. А метки...
Закомментировать код C++
Здравствуйте, ребят помогите пожалуйста. Нужно прокомментировать код, прям каждую строчку. Очень строгий препод, спрашивает ВСЕ!!! #include <iostream.h> #include <iomanip.h> int i,j,m; ...
C++ Сумма кодов символов: подсчёт с помощью ассемблерной вставки http://www.cyberforum.ru/cpp-beginners/thread1203305.html
Всем привет, нужно написать программу на С++ с ассемблерной вставкой , которая будет находить сумму кодов символов, находящихся между символами с индексами, определенными пользоваетелем, в исходной...
C++ Сформировать одномерные массивы, каждый элемент которых является суммой отрицательных элементов строк матрицы Задать значения целочисленным элементам матриц A и B размерностью 4 на 7 и сформировать одномерные массивы Y и Z соответственно , каждый элемент которых является суммой отрицательных элементов... подробнее

Показать сообщение отдельно
nata95
1 / 1 / 0
Регистрация: 05.01.2014
Сообщений: 109

Пожалуйста, переведите с Pascal на C++ - C++

09.06.2014, 10:15. Просмотров 230. Ответов 1
Метки (Все метки)

Помогите, пожалуйста. Времени в обрез.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var
  arr: array[1..100] of integer;
  i,n: integer;
 
begin
  read(n);
  for i := 1 to n do
  begin
    read(arr[i]);
  end;
  write(arr[n]);
  for i := 1 to n-1 do 
  write(' ',arr[i]);  
  writeln();
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru