grekova5
?>

Найти сумму чисел, оканчивающихся на 9 (Паскаль): дана последовательность из N чисел, количество чисел вводится с клавиатуры. Числа выбираются из промежутка [ 10; 50 ] .

Информатика

Ответы

Викторович Попков

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.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Найти сумму чисел, оканчивающихся на 9 (Паскаль): дана последовательность из N чисел, количество чисел вводится с клавиатуры. Числа выбираются из промежутка [ 10; 50 ] .
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Aleksandrovich-Yurevna1421
danya1509379
Dodkhobekovich1683
myxa120283
olgolegovnak
demakova1969
Nikolaevich
sabinina0578
info122
borisrogovpr3407
Butsan-Bagramyan
Сергеевна-С.А.1549
Inozemtseva Korolev1271
nofate1016585
Korneeva1856