В массиве хранятся сведения о стоимости 12 различных предметов. Определить общую стоимость всех предметов. Visual Basic
yevdokimenkoal
3
09.11.2020 13:35
1
Другие вопросы по теме Информатика
katia6747
29.12.2020 14:28
Андроід1
29.12.2020 14:27
9Mesut8
29.12.2020 14:25
Maci189
29.12.2020 14:24
nikoldasha421
29.12.2020 14:24
Зайка20005
29.12.2020 14:22
Zeka211
17.01.2021 03:06
karinakatushkiowsqqh
17.01.2021 01:40
hristina112
20.01.2021 10:59
Популярные вопросы
- Небольшой современный дом в пригороде 7 букв...
1 - Напишите 5 предложений из художественного стиля с названием произведения...
3 - Первоначальное название группы битлз...
1 - Десять вопросов с вопросительными словами (what? when? where? who? how?...
1 - Какие горы челябинской области не бывают мокрыми...
2 - Маша посчитала соотношение числа рубашек к числу брюк в мамином шкафу,...
3 - Точка m принадлежит отрезку ab. найдите расстояние между серединами отрезков...
3 - Напишите сочинение нужно умоляю ! напишите ...
3 - Составить сочинение на казахском языке на тему как я готовлю мясо . ....
2 - Начертить блок-схему алгоритма.ввести последовательность целых чисел {aj},j=....
3
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.