Question

ДАЮ 100 БАЛЛОВ!!!! Найти сумму чисел, которые оканчиваются на 9. Программа получает на вход количество чисел в последовательности, а затем сами числа. Через паскаль

Answer 1

Ответ:

var i,M,K,N:integer;

begin

Readln(N);

K:=0;

for i:=1 to N do

begin

readln(M);

if M mod 10 = 9

then

begin

K:=K + M;

end;

end;

write(K);

end.

Объяснение:

Answer 2

Ответ:

var i,k,a,s:integer;

begin

s:=0;

read(k);

for i:=1 to k do

begin

read(a);

if a mod 10 = 9 then s:=s+a

end;

write(s)

end.

Answer 3

Сумма чисел, оканчивающихся на 9

Подход к решению

Для нахождения суммы чисел, оканчивающихся на 9, в последовательности необходимо выполнить следующие шаги: 1. Получить количество чисел в последовательности. 2. Считать сами числа. 3. Проверить каждое число на окончание на 9 и, если число удовлетворяет условию, добавить его к общей сумме.

Пример кода на Pascal

```pascal program SumOfNumbersEndingIn9; var count, number, sum, i: integer; begin sum := 0; write('Enter the count of numbers: '); readln(count); for i := 1 to count do begin write('Enter number ', i, ': '); readln(number); if number mod 10 = 9 then sum := sum + number; end; writeln('The sum of numbers ending in 9 is: ', sum); end. ```

В этом примере кода программа сначала запрашивает количество чисел в последовательности, затем считывает сами числа и проверяет каждое на окончание на 9. Если число удовлетворяет условию, оно добавляется к общей сумме, которая затем выводится на экран.

Примечание: Пожалуйста, убедитесь, что ваша среда разработки поддерживает ввод/вывод данных и циклы, такие как `for`, `readln`, `writeln`, и т.д.

Надеюсь, это поможет! Если у вас возникнут дополнительные вопросы, не стесняйтесь задавать.