составьте алгоритм для вычисления суммы 50 чисел
10-11 класс
|
var i,n,s:integer;
begin
n:=0;
for i:=1 to 50 do begin
readln (n);
s:=s+n;
end;
writeln(s);
end.
Другие вопросы из категории
и Do-Loop Until с послесловием
найти максимальный элемент и его индекс.
распечатать массив в строку
Читайте также
ВБ- 71 Разработайте схему алгоритма, который проверяет, не превосходит ли сумма двух действительных чисел А и В числа 100. Если не превосходит, установить значение флага F=0, иначе установить значение флага F=1. Вывести значение F.
ЦА-10 Разработайте схему алгоритма для вычисления суммы S первых n целых чисел. Предусмотрите ввод значения n с клавиатуры. Текущее значение целого числа имеет имя i (i = 1, 2, .., n).
2) Заданы действительные числа a , b , c и d . Написать программу нахождения полусуммы наименьшего и наибольшего из них.
3) Написать программу для вычисления суммы цифр числа , введенного с клавиатуры
Помогите прошу
S=1+1/2+1/3+1/4+...+1/N
Число N вводится с клавиатуры.
Протестировать алгоритм для N=1,N=2,N=4,N=6.
Протестировать алгоритм на различных исходных данных (включая вещественные числа) и доказать правильность его работы.
2. Вводятся величины X,Y целого типа. Разработать схему алгоритма для обмена значений величин. Необходимо использовать вспомогательную величину Т. Протестировать алгоритм для X=5 и Y=-11.