Предмет: Информатика,
автор: РаАлАн
В программе Pascal ABC составьте программу, которая вычисляет произведение n чисел вводимых с клавиатуры.
Ответы
Автор ответа:
0
var
sum, k, n, i: integer;
begin
sum := 0;
write('n: ');
readln(n);
for i := 1 to n do
begin
readln(k);
sum := sum + k;
end;
writeln('sum = ', sum);
end.
sum, k, n, i: integer;
begin
sum := 0;
write('n: ');
readln(n);
for i := 1 to n do
begin
readln(k);
sum := sum + k;
end;
writeln('sum = ', sum);
end.
Похожие вопросы
Предмет: Физика,
автор: Elmeddin444
Предмет: Математика,
автор: Lineed
Предмет: Физика,
автор: kyzyrbekovamadina
Предмет: Математика,
автор: ossin25miss
Предмет: Алгебра,
автор: remboo