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

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

Восстановить пароль Регистрация
 
gigas
7 / 1 / 1
Регистрация: 30.11.2012
Сообщений: 91
17.04.2013, 14:48     Перевод из Паскаля в Си++ #1
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.
Ребят помогите перевести программу

 Комментарий модератора 
Используйте теги подсветки кода
Перевод из Паскаля в Си++
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.04.2013, 14:48     Перевод из Паскаля в Си++
Посмотрите здесь:

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

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

Текущее время: 08:55. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru