
Задано n произвольных чисел. Найти количество всех чисел заканчивающихся на цифру 7


Ответы на вопрос

Ответ:
Program chisla;
Var
Count,i, n : integer;
Begin
readln(n) ;
Count:=0;
For i := 1 to n do begin
readln(n);
If (n mod 10) = 7 then begin
Count:= Count+1;
end;
end;
writeln(Count) ;
end.
Объяснение:
Я затестила, работает



Для найти количество чисел, заканчивающихся на цифру 7 из заданных n произвольных чисел, следует пройтись по каждому числу и проверить, заканчивается ли оно на 7. Если это так, увеличить счетчик на 1. Вот примерный алгоритм на псевдокоде:
arduinoПусть count = 0 // Начальное значение счетчика равно нулю
Для каждое число num из заданных n произвольных чисел:
Если num % 10 == 7:
Увеличить count на 1
Вывести значение count
В этом алгоритме %
- это оператор взятия остатка от деления, он позволяет определить последнюю цифру числа. Если остаток от деления числа на 10 равен 7, значит число заканчивается на 7.
Примечание: Псевдокод представляет общую логику алгоритма, который может быть реализован на различных языках программирования. Выполните его на платформе или языке программирования, который вам удобен.


Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili