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

Перевод из Паскаля в Си++ - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Как называется и что означает такая форма объявления объекта (конструктор) http://www.cyberforum.ru/cpp-beginners/thread840517.html
Конструктор явно вызывать нельзя, но эта форма записи у меня часто ассоциируется с "явным" вызовом конструктора. Как правильно это называть и объяснить человеку что происходит? MyClass obb; obb = MyClass(2); // прокомментировать
C++ Определите поезда, которые отправляются с 21 до 23 часов Определите поезда, которые отправляются с 21 до 23 ч. Информация о поездах (город назначения и время отправления) хранится в соответствующих массивах. http://www.cyberforum.ru/cpp-beginners/thread840508.html
Задача в С++ C++
Составьте программу для решения следующих задач. Программы снабдите подробными комментариями. Подготовьте блок-схему алгоритма. 1. Дана последовательность натуральных чисел а1, а2,..., аn. Создать массив из четных чисел этой последовательности. Если таких чисел нет, то вывести сообщение об этом факте. 2. Сформируйте два массива, по k элементов в каждом, с помощью датчика случайных ...
Операция new. Указатель на указатель C++
Всем aloha. Проблема в следующем: в своей програмке я создаю указатель на указатель person** ptrP затем инициализирую его массивом указателей на объекты класса person person** ptrP = new person* далее присваиваю каждому указателю адрес инициализированного объекта person, но ничего не получается по какой то причине. не работает даже вызов функции display_person(), для любого из указателей, хотя...
C++ Удаление из массива а)Все четные элементы б)Все элементы с четными индексами http://www.cyberforum.ru/cpp-beginners/thread840491.html
помогите=)
C++ Даны натуральные числа а1, а2,., а n . Указать те из них, у которых остаток от деления на М равен L, где (0 ≤ L ≤ M-1) Даны натуральные числа а1, а2,..., аn . Указать те из них, у которых остаток от деления на М равен L, где (0 ≤ L ≤ M-1) подробнее

Показать сообщение отдельно
gigas
7 / 1 / 1
Регистрация: 30.11.2012
Сообщений: 91
17.04.2013, 14:48     Перевод из Паскаля в Си++
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
uses crt;
var kr:array[1..100] of real;
    br:array[1..100] of string;
    n,i:integer;
begin
clrscr;
write('Количество бригад n=');
readln(n);
writeln('Введите данные:');
for i:=1 to n do
 begin
  writeln('Бригада ',i);
  write('  Название: ');readln(br[i]);
  write('  Результат(тонн): ');readln(kr[i]);
 end;
writeln('Не выполнили план в 1 тонну:');
for i:=1 to n do
if kr[i]<1 then writeln(br[i]);
readln
end.
Ребят помогите перевести программу

 Комментарий модератора 
Используйте теги подсветки кода
Перевод из Паскаля в Си++
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 05:40. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru