82

Дан массив из десяти целых чисел написать программу подсчитывающую…

mar1k 07 марта 2023

Дан массив из десяти целых чисел написать программу подсчитывающую сколько раз в массиве встречается заданное с клавиатуры числоb

категория: информатика

84

Vari, b: integer; m: array [1… 10] of integer; Begin.For i: =1 to 10 doReadln (m[i],b); S: =0If (m[i] div 10=b) or (m[i] mod 10=b) thenS: =s+1 ну и концовку Write (S); End.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...