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

C++

Войти
Регистрация
Восстановить пароль
 
Юляшко
2 / 2 / 0
Регистрация: 02.03.2010
Сообщений: 95
#1

нужно перевести на С++ - C++

25.04.2010, 19:06. Просмотров 434. Ответов 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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
uses crt;
const n=4;
type rec=record
      name,str:string;
      oc1,oc2:integer;
      sum:integer;
     end;
var x:array[1..n] of rec;
    i:integer;
    max:integer;
    k:string;
begin
ClrScr;
for i:=1 to n do
 begin
  Write(' Имя: ');
  Readln(x[i].name);
  Write(' Странна: ');
  Readln(x[i].str);
  Write(' оценка 1: ');
  Readln(x[i].oc1);
  Write(' оценка 2: ');
  Readln(x[i].oc2);
  writeln;
 end;
 clrscr;
Writeln('Таблица: ');
for i:=1 to n do
 x[i].sum:=x[i].sum+x[i].oc1+x[i].oc2;
Writeln('----------------------------------------------------');
Writeln('||  иМя    |  Страна  | оценка 1| оценка 2| сумма ||');
Writeln('----------------------------------------------------');
for i:=1 to n do
 Writeln('||',x[i].name:9,'|',x[i].str:11,'|',x[i].oc1:9,'|',
          x[i].oc2:8,'|',x[i].sum:7,'||');
Writeln('----------------------------------------------------');
max:=x[1].sum;
for i:=1 to n do
 if x[i].sum>max then
  begin
   max:=x[i].sum;
   k:=  x[i].name;
  end;
Writeln(' Чемпион: ',k,' Заработал ',max,' очков');
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
25.04.2010, 19:06
Здравствуйте! Я подобрал для вас темы с ответами на вопрос нужно перевести на С++ (C++):

Нужно перевести из языка Си в С++ - C++ Builder
//--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #include...

Хелп! нужно перевести код с Делфи на С++ - C++ Builder
Может есть прога для перевода и соблюдения синтаксиса? я хз... спасибо

Нужно перевести код с Delphi на C++ Builder - C++ Builder
unit frmPostfix; interface uses Windows, SysUtils, Classes, Controls, Forms, Contnrs, StdCtrls, Math; type ...

Нужно перевести с Buildera на с++ в visual studio - C++ Builder
//--------------------------------------------------------------------------- #include <vcl.h> #include <math.h> #include...

Нужно перевести с C# на C++ Builder (информация о заявках на авиабилеты) - C++ Builder
Всем привет! Задали курсовую на С++ Builder, на С# накидал за пол часа, но препода не устраивает, а в С++ я не бумбум ). Помогите...

Нужно перевести вкладку PageControl в состояние плавающего окна - C++ Builder
Всем здравствуйте. У меня возникла небольшая проблема. В программе есть приемник (PageControl), есть кнопка которая генерирует новые...

1
Юляшко
2 / 2 / 0
Регистрация: 02.03.2010
Сообщений: 95
27.04.2010, 22:13  [ТС] #2
помогите пожалуйста! Я в С++ не очень разбираюсь
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
27.04.2010, 22:13
Привет! Вот еще темы с ответами:

Код Паскаль)вот эту часть нужно перевести на С++ - C++ Builder
program elmgmv; uses Grt,Graph;

Нужно перевести HEX строку в float - Visual C++
У меня возникли трудности с конвертацией 4 байта HEX (например строка FFAAFFAA) в число типа float (например 2.534. Тип числа...

нужно перевести с паскаля на с++ - C++
uses crt; var E,x,p,t:real; k:integer; { Возведение х в степень к } function step(x:real;k:integer):real; var i: integer; ...

нужно перевести с pascal на c++ - C++
Пусть N – натуральное число. Вычислить: y=1*2+2*3*4+3*4*5*6+...+N*(n+1)(n+2)*…*2n pascal не знаю....помогите пожалуйста var ...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru