VPF::[С++]строки - Форум программистов

brahmanchik

Дата 14.6.2012, 18:30 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 2
Регистрация: 14.6.2012

Репутация: нет
Всего: нет

Распечатать фамилии тех учеников класса, которые являются
хорошистами и отличниками по итогам года. Также указать,
насколько их средний балл отличается от среднего балла класса.

Есть код для турбо паскаля, с данным заданием, надо переделать под С++

Код


uses crt;
const nmax=20;
      line='-----------------------------------------------------';
      shap='|      Фамилия, имя      | Ср. балл | Отл.от класса |';
 
 
type ucheniki = record
     fam:  string[10];
     name: string[10];
     srbu: real;
     end;
 
var u:array [1..nmax] of ucheniki;
    i,j,k,n:integer;
    srbk: real;
    
begin
repeat
write('Сколько учеников? ');
readln(n);
until n in [1..nmax];
writeln('Внесите данные об учениках: ');
srbk:=0;
for i:=1 to n do
    with u[i] do
         begin
         write('Фамилия ',i,' учащегося: '); readln(fam);
         write('Имя: '); readln(name);
         writeln('Средний балл по итогам года: '); readln(srbu);
         srbk:=srbk+srbu;
         end;
srbk:=srbk/n;
clrscr;
write('Отличники и хорошисты в классе ');
for i:=1 to n do
    with u[i] do
         if srbu>=4 then
            begin
            inc(k);
            if k=1 then
               begin
               writeln;
               writeln(line);
               writeln(shap);
               writeln(line);
               end;
            writeln('|',fam:10,name:11,'|':4,srbu:7:2,'|':4,srbu-srbk:10:2,'|':6);
            end;
if k=0 then writeln('отсутствуют') else
   begin
   writeln(line);
   writeln('Всего ',k,' учащихся');
   end;
readln;
end.

Модератор: будь внимателен при использовании кнопки "Код"

Это сообщение отредактировал(а) bsa - 15.6.2012, 11:17

brahmanchik

Дата 14.6.2012, 19:11 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 2
Регистрация: 14.6.2012

Репутация: нет
Всего: нет

borisbn

Дата 14.6.2012, 21:35 (ссылка)

(голосов:1)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 4875
Регистрация: 6.2.2010
Где: Ростов-на-Дону

Репутация: 11
Всего: 135

Цитата(brahmanchik @ 14.6.2012, 18:30

)

надо переделать под С++

кому надо ? тебе ? дык переделывай.
и вапсче, нуна уважать глаза визави - чо за нах ?
user posted image

--------------------

Женщины отличаются от программистов тем, что у них чары состоят из стрингов

math64

Дата 15.6.2012, 07:55 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2505
Регистрация: 12.4.2007

Репутация: нет
Всего: 72

borisbn, Он пробовал, но видимо не понял как им пользоваться:

Цитата(brahmanchik @ 14.6.2012, 18:30

)

[code=[/code] ... ]

Нужно: нажать Код, в выпадающем списке выбрать Delphi (в этом разделе по умолчанию C++)
Между [ code=delphi] и [ /code] вставить свой код. Если нужно неределать весь код - в центр помощи.
Если непонятно, как переделать отдельные фрагменты - можно задать вопрос здесь, указав эти фрагменты.

Это сообщение отредактировал(а) math64 - 15.6.2012, 07:57

bsa

Дата 15.6.2012, 11:18 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 9185
Регистрация: 6.4.2006
Где: Москва, Россия

Репутация: 1
Всего: 196

M
bsa

Для домашних заданий, курсовых и т.п. существует \"Центр Помощи\".

Тема перенесена.

--------------------

Правильно заданный вопрос - половина ответа
Отзывы о работе модератора.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Центр помощи \| Следующая тема »