Найти средний рост учащихся класса (Pascal -> С++)

@Doc · Регистрация: 05.05.2014

Pascal

const nmax=20;
var a:array[1..nmax] of real;
    i,n:integer;
    s:real;
begin
 repeat
  write('Кол-ство учащихся класса n=');
   readln(n);
 until n in [1..nmax];
  for i:=1 to n do
   begin
    write(i,' участник ');
    readln(a[i]);
    s:=s+a[i];
   end;
  writeln('Средний рост учащихся в классе = ',s/n:0:2);
end.

Добавлено через 11 минут
перевести в C++

@_Vertigo_ · 01.07.2014, 14:08

Держи:

C++

#include <iostream>
using namespace std;
int main(){
    setlocale(LC_ALL, "Russian");
    int n = 0;
    double s = 0;
    cout <<  "Введите количество учащихся:" << endl;
    cin >> n;
    double *mas = new double [n];
    for ( int i = 0; i < n; i++){
        cout << "Введите рост учащегося №:" << i+1 << endl;
    cin >> mas[i];
    s += mas[i];
    }
    cout << "Средний рост: " << s/n << endl;
    delete mas;
}

Опции темы

Найти средний рост учащихся класса (Pascal -> С++)

Решение