Предмет: Информатика, автор: AngiF

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

Ответы

Автор ответа: restIess

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.

AngiF: Спасибо

Предыдущий вопрос

Следующий вопрос

Интересные вопросы

Предмет: Русский язык, автор: levichevayuliy

Определи падеж у существительных множественного числа.
В зеленых лугах, у проезжих дорог все лето цветут одуванчики. Они похожи на маленькое солнце с золотыми лучами. Всё лето цветут одуванчики, а созревшие их семена собраны в лёгкий пушистый шарик.

2 года назад

Предмет: Другие предметы, автор: польхин

-что такое чай где он появился и как его сделать

2 года назад

Предмет: Математика, автор: yana113

Из цветной бумаги нужно сделать 10 закладок. Длинна каждой закладки 20 см, ширина 3 см. Сколько квадратных дециметров цветной бумаги потребуется для изготовления закладок?

2 года назад

Предмет: Математика, автор: Sassha121628

Помогите пж..Нужно написать уравнение..Я как обычно не допераю ну или же мне лень.Вопщем помогите.Задачу нужно решить уравнением:в 1 корзине 3х яблок во 2 корзине х яблок .А сравнение на 8 больше..

8 лет назад

Предмет: Математика, автор: веранастякрас

три дня грузовая машина по 2 раза в день ездила от деревни до железнодорожной станции и обратно и проехала всего 180 км. Сколько километров от деревни до станции?краткую запись пож подскажите как????

8 лет назад