Вводится последовательность из n целых чисел (3

Question

Зеус

Информатика

21 октября, 22:46

Вводится последовательность из n целых чисел (3

+1

Ответы (1)

Знаешь ответ на этот вопрос?

Расили · Answer 1

program zz1;

var a, b, n, i:integer; / / задаем переменные целого типа

begin

write (' введите заданное n (3
read (n);

for i:=1 to n do / / организуем цикла на n повторений

begin

read (a); / / / / вводим с клавиатуры очередное число последовательности

b:=b + a mod 10; / / получаем последнюю цифру и прибавляем ее к сумме

end;

write (' сумма последних цифр вводимых чисел = ', b); / / выводим ответ

end.