var
a,b,c,d,e:integer;
begin
readln(a,b,c,d,e);
writeln('Summa= ',a+b+c+d+e);
end.
Похожие записи/страницы:
- Составить программу определения суммы первых пяти ее членов. Вывести значение искомой суммы и всех ее слагаемых…
- Дана матрица В(3,3) произвольных чисел. Вычислить произведение сумм элементов 1-й и 3-й строк матрицы, используя…
- По заданной формуле (i*i)/( 2+(i*i*i) ) члена ряда с номером k составить: программу вычисления, с помощью цикла…
- Ввести с клавиатуры произвольную последовательность целых чисел (кол-во вводимых чисел должно задаваться в ходе…
- Для заданной матрицы найти номер столбца с минимальной суммой положительных элементов. Использовать подпрограмму…
- Вычисление суммы бесконечного ряда (итерационный цикл) - Pascal(Паскаль)
- Даны числа А,В,С. Вычислить сумму положительных и произведение отрицательных. Если произведение по модулю…
- Составить процедуру нахождения максимального из двух действительных чисел, вводимых с клавиатуры. Используйте…