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

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

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Не понятное поведение SDL_RenderCopy http://www.cyberforum.ru/cpp-beginners/thread1220527.html
Здравствуйте! Возникла проблема при передаче указателя в SDL_RenderCopy, SDL_RenderCopy возвращает ошибку -1 и пишет Invalid Texture. Я реализовал простой класс, для приёма Surface и передаче его в...
C++ Палиндром, блок-схема и алгоритм решения Вот готовая, рабочая задача: #include <iostream> using namespace std; int main() { int d,n=0; cin >> d; int m=d; while(m) { http://www.cyberforum.ru/cpp-beginners/thread1220513.html
C++ Лабораторная работа "Графики и функции"
Кто знает где достать исходник и описание? Помогите пожалуйста.
C++ Вычислить значение дроби для заданном значении n
Задача: Вычислить значение дроби для заданном значении n. Вот задача, сделанная мной, но она не верна: #include <iostream> using namespace std; int main() { double n; cin>>n; double...
C++ Написать программу которая читает из командной строки два аргумента: имя переменной и значение этой переменой http://www.cyberforum.ru/cpp-beginners/thread1220489.html
Написать программу которая читает из командной строки два аргумента : имя переменной и значение этой переменой. Если переменная не может быть установлена , вывести ошибку если ошибки небыло вывести...
C++ Олимпиадная задача с тимуса №1209 Ограничение времени: 1.0 секунды Ограничение памяти: 64 МБ Представим себе бесконечную последовательность цифр, составленную из записанных друг за другом возрастающих степеней десятки. Вот начало... подробнее

Показать сообщение отдельно
Doc
1 / 1 / 0
Регистрация: 05.05.2014
Сообщений: 106

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

01.07.2014, 12:56. Просмотров 1064. Ответов 1
Метки (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
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++
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru