2 / 2 / 1
Регистрация: 02.03.2010
Сообщений: 95
1

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

25.04.2010, 19:06. Показов 746. Ответов 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
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.04.2010, 19:06
Ответы с готовыми решениями:

Нужно перевести из С++ в Си
Нужно перевести из С++ в Си#include <iostream> #include <time.h> using namespace std; int*...

Нужно перевести на Си
void Del() { if (head == NULL) cout << "\nСписок пуст\n\n"; else { ...

Нужно перевести из с++ в си
#include <iostream.h> #include <math.h> #include <conio.h> float f(float x) { return...

Нужно перевести на C#
uses crt; var m : arrayof integer; i, k, N, b, j : integer; begin clrscr; ...

1
2 / 2 / 1
Регистрация: 02.03.2010
Сообщений: 95
27.04.2010, 22:13  [ТС] 2
помогите пожалуйста! Я в С++ не очень разбираюсь
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.04.2010, 22:13
Помогаю со студенческими работами здесь

Нужно перевести из С++ в С
int _main() { int M = 0, N = 0; cout << "Input M: " << endl; cin >> M; cout << "Input N:...

Нужно перевести из java в C++
Вот код на java int m = 0,a; String s; for (int i = 1; i < 101; i++) { ...

Нужно перевести с C++ на PHP
Переведите пожалуйста на PHP! using namespace std; int main() { setlocale...

Нужно перевести из Паскаля в C#
Нужно перевести из Паскаля в C# Пожалуйста! uses crt; {для заполнения множеств используем...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru