Предмет: Информатика,
автор: LUBUMAR
РЕШИТЬ С ПОМОЩЬЮ ПАСКАЛЯ +ОБЪЯСНИТЬ ПОЧЕМУ ТАК!!ДАЮ МНОГО БАЛЛОВ
⦁ Вычислить сумму последовательности , где n вводится пользователем, и вывести ее на экран.
⦁ Вывести на экран количество вводимых пользователем чисел. Вычисления остановить, когда пользователь введет 0.
⦁ Вычислить сумму семи произвольных чисел.
kylyshevo:
не совсем понял 3 задание
Ответы
Автор ответа:
1
var
ch: array[1..100] of real;
i, n: integer;
s: real;
begin
repeat
inc(i);//+1
write($'Введите {i} число: ');
readln(ch[i]);//записываем в массив число
until ch[i] = 0;//проверяется условие,если число равно 0 то прекращаем ввод
write($'Введите,сколько чисел сложить:');
readln(n);
writeln;
writeln($'Вы ввели {i} чисел');
for i := 1 to n do
begin
s := ch[i] + s;//складываем числа n штук
end;
writeln($'Сумма чисел = {s}');
end.
Похожие вопросы
Предмет: Литература,
автор: rbaidibek
Предмет: История,
автор: Аноним
Предмет: География,
автор: tomcukpolina
Предмет: Алгебра,
автор: двоечник42
Предмет: Алгебра,
автор: leks19792002