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

В массиве хранится сведения о стоимости 12 различных предметов. определить общую стоимость всех предметов? - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Задали действительные числа X1,X2,.Xn (n>=2 и заранее неизвестна). Получить последовательность (X1-Xn),(X2-Xn),.(Xn-1-Xn) http://www.cyberforum.ru/cpp-beginners/thread697632.html
Задали действительные числа X1,X2,.Xn (n>=2 и заранее неизвестна). Получить последовательность (X1-Xn),(X2-Xn),...(Xn-1-Xn). Спасибо. Добавлено через 2 минуты надо реализовать как Работа со...
C++ Даны катеты прямоугольника найти периметр 1.Нужна прога,для вычесление диаметра окружности,длины и площади 2.Даны катеты прямоугольника найти периметр.Спасибо! http://www.cyberforum.ru/cpp-beginners/thread697618.html
Задали действительные числа X1,X2,.Xn (n>=2 и заранее неизвестна).Вычислить (X1+n) (X2+n-1).(Xn+X1) и (X1+X2+2Xn) (X2+X3+2Xn-1). (Xn-1+Xn+2X2) C++
Задали действительные числа X1,X2,...Xn (n>=2 и заранее неизвестна).Вычислить (X1+n) (X2+n-1)...(Xn+X1) и (X1+X2+2Xn) (X2+X3+2Xn-1)... (Xn-1+Xn+2X2) Добавлено через 52 секунды Спасибо за ответ ...
C++ Компилятор ругается, что для индекса требуется массив или указатель
У меня программа делает, по крайней мере, должна делать следующее: заполнять, линейный массив,размер которого задаются с клавиатуры,случайными натуральными числами в заданном диапазоне,выводить...
C++ Повторяющиеся слова http://www.cyberforum.ru/cpp-beginners/thread697613.html
Даны 2 предложения. Напечатать слова, которые встречаются в двух предложения только один раз Подскажите, как эту задачу решить на с++ Добавлено через 3 часа 41 минуту Помогите плииз... срочно...
C++ Различные байты помогите, организовать цикл в котором перебираются все возможные варианты байт!! т.е составить массив где первым байтом будет 0x00 а последний 0хFF! подробнее

Показать сообщение отдельно
len95665
0 / 0 / 0
Регистрация: 14.11.2012
Сообщений: 19
14.11.2012, 18:26
Var a:array [1..12] of integer;
sym,i:integer;

BEGIN

For i:=1 to 12 do
Begin
Read(a[i]); // Ввод стоимости
sym:=sym+a[i];
End;

Write(sym);

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