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

Перевести с Pascal на C++ - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Вывести первые 4 степени данного числа http://www.cyberforum.ru/cpp-beginners/thread1224422.html
"Составить алгоритм, который будет выводить первые 4 степеня данного числа." Не могу никак понять как. Пожалуйста, помогите.
C++ Объединить два функционала - создание окон и рисование в них Доброго времени суток. Помогите пожалуйста или хотя бы подскажите как соединить два кода в один. Задача состоит в том, чтобы программа могла создавать окна и в этих окнах можно было рисовать.... http://www.cyberforum.ru/cpp-beginners/thread1224415.html
C++ Написать MatLAB-скрипты, считывающие данные о кривой и поверхности из файлов
Указания к лабораторной работе. 1. Сгенерировать с помощью C++-программ файлы с данными, описывающими трех- мерную кривую и трехмерную поверхность. 2. Написать MatLAB-скрипты, считывающие данные о...
C++ На вход подаётся вектор и ко всем его элементам требуется применить одну математическую операцию
Здравствуйте, уважаемые форумчане! Есть на первый взгляд простая задача: на вход подаётся вектор и ко всем его элементам требуется применить одну математическую операцию, после чего получаем...
C++ Чтение mbr диска - Сдвиг на 1 байт http://www.cyberforum.ru/cpp-beginners/thread1224337.html
вобщем имеется образ жестака от виртуалки сконвертированный в бинарь. пытаюсь прочитать его mbr, все читается, но каким-то макаром сигнатура 55AA находится не в 510 байте, а в 509 О_О. коим образоим...
C++ Из массива А удалить те элементы, встречающиеся и в массиве А и в массиве В хотя бы два раза Всем привет ! В силу своей ограниченности и качества современного образования, не могу преодолеть задачу первого курса по программированию в среде С++ (Borland) Пишу курсовую работу и никак не... подробнее

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

Перевести с Pascal на C++ - C++

08.07.2014, 14:31. Просмотров 196. Ответов 2
Метки (Все метки)

Здравствуйте! Помогите пожалуйста перевести вот эти программы с языка Pascal на C++ Сам я очень плохо знаю C++ поэтому был бы крайне признателен вам!
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
var
  A, B, C: array[1..10] of integer;
  i: byte;
  
begin
  writeln('Введите элементы первого массива:');
  for i := 1 to 10 do begin
    write('a[', i, '] = ');
    readln(a[i])
  end;
  writeln;
  writeln('Введите элементы второго массива:');
  for i := 1 to 10 do begin
    write('b[', i, '] = ');
    readln(b[i])
  end;
  writeln;
  writeln('Результат:');
  for i := 1 to 10 do begin
    if odd(i) then c[i] := b[i + 1]
    else c[i] := a[i - 1];
    write(' ', c[i])
  end;
  writeln
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru