Решение задачи по написанию программы на подсчет суммы элементов в массиве меньших некоторого значения
Написать на трех языках программирования Pascal, C++, Школьшый алгоритмический язык программу на подсчет суммы элементов в массиве из 5 элементов, меньших 4-х. , Массив задается внутри программы присваиванием значения ячейке массива (пример dat[2]:=44; ---> в ячейку 2 массива dat записали значение 44)
Массив
3 | 4 | 5 | 7 | 9 |
.
Блок схема программы:
Кумир (символ | в начале строки обозначаент начало комментария, т.е. данная часть кода в алгоритме не участвет, а присутвует лишь для пояснения отдаваемых команд)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
алг нач | резервируем область памяти для массива dat цел таб dat[1:5] | резервируем область памяти для переменных i, sum цел i,sum dat[1]:=3; dat[2]:=4; dat[3]:=5; dat[4]:=7; dat[5]:=9; |переменной sum присваиваем значение 0 sum:=0; | цикл со счетчиком i для перебора всех элементов массива нц для i от 1 до 5 | если значение элемента массива меньше 4, | то к sum прибавляем значение этого элемента если dat[i]<4 то sum:=sum+dat[i] все кц вывод "Сумма элементов массива < 4 = ", sum кон |
.
С++ (символ // в начале строки обозначаент начало комментария, т.е. данная часть кода в алгоритме не участвет, а присутвует лишь для пояснения отдаваемых команд)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 |
#include <iostream> using namespace std; int main() { //резервируем область памяти для массива dat и переменных i, sum int dat [5],i,sum; dat[1]=3; dat[2]=4; dat[3]=5; dat[4]=7; dat[5]=9; //переменной sum присваиваем значение 0 sum=0; //цикл со счетчиком i для перебора всех элементов массива for (i=1;i<=5;i++){ //если значение элемента массива меньше 4 //то к sum прибавляем значение этого элемента if (dat[i]<4){sum=sum+dat[i];}} //вывод sum за пределами цикла cout << "summa elementov massiva < 4 = "<< sum; } |
.
Pascal (символ // в начале строки обозначаент начало комментария, т.е. данная часть кода в алгоритме не участвет, а присутвует лишь для пояснения отдаваемых команд)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 |
//резервируем область памяти для массива dat и переменных i, sum var dat: array [1..5] of integer; var i, sum: integer; begin //заполняем массив числами dat[1]:=3; dat[2]:=4; dat[3]:=5; dat[4]:=7; dat[5]:=9; //переменной sum присваиваем значение 0 sum := 0; //цикл со счетчиком i для перебора всех элементов массива for i := 1 to 5 do //если значение элемента массива меньше 4, //то к sum прибавляем значение этого элемента if (dat[i] < 4 ) then sum := sum+dat[i]; //вывод sum за пределами цикла write('сумма элементов массива < 4 = ', sum); end. |
Все статьи раздела
Решение задачи на переворот числаРешение задачи на поиск минимального целого числа в массиве.Решение задачи по написанию программы на поиск номера (индекса) максимального элемента в массивеРешение задачи по написанию программы на поиск номера (индекса) минимального элемента в массивеРешение задачи по написанию программы на подсчет кол-ва элементов в массиве больших некоторого значенияРешение задачи по написанию программы на подсчет кол-ва элементов в массиве меньших некоторого значенияРешение задачи по написанию программы на подсчет суммы элементов в массиве меньших некоторого значенияРешение задачи по написанию программы на подсчет суммы элементов в массиве больших некоторого значенияРешение задачи по написанию программы на подсчет суммы всех элементов в массиве Решение задачи по написанию программы на поиск максимума в массиве