Предмет: Информатика,
автор: valek199723
Подсчитать сумму 10 произвольно введенных чисел. Подробно расписать чтоб было 5. Решается моя оценка. буду благодарен.
Ответы
Автор ответа:
0
var s,i,a:integer; //объявляем необходимые переменные
begin
s:=0; //изначально сумма равна 0
write('Введите 10 чисел через enter '); //запрос 10-ти чисел
for i:=1 to 10 do begin //с помощью цикла вводим числа
readln(a);
s:=s+a; // вычисляем сумму(смысл цикла уж не буду расписывать)
end;
write('Сумма 10-ти чисел = ',s); //выводим на экран искомое значение
end.
begin
s:=0; //изначально сумма равна 0
write('Введите 10 чисел через enter '); //запрос 10-ти чисел
for i:=1 to 10 do begin //с помощью цикла вводим числа
readln(a);
s:=s+a; // вычисляем сумму(смысл цикла уж не буду расписывать)
end;
write('Сумма 10-ти чисел = ',s); //выводим на экран искомое значение
end.
Автор ответа:
0
Вместо отчета оставила в программе под слэшами комментарии
Автор ответа:
0
Пожалуйста)
Автор ответа:
0
а ты программу проверяла
Автор ответа:
0
Да
Похожие вопросы
Предмет: История,
автор: dasharex56
Предмет: Физкультура и спорт,
автор: xomyak2001
Предмет: Математика,
автор: Splyx02
Предмет: География,
автор: kolomois76