Напишите программку в паскале, которая в последовательности натуральных чисел определяет

Напишите программку в паскале, которая в последовательности естественных чисел определяет количество кратных 5 и оканчивающихся 0. программка получает количество чисел на вход, а потом сами числа.

Задать свой вопрос
1 ответ

Ответ:

var a,b,i,s:integer;

begin

read (a);

s:=0;

for i:=1 to a do

begin

read (b);

if (b mod 5=0) and (b mod 10=0) then

s:=s+1;

end;

write(s);

end.

Разъясненье:

PS: python лучше

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

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

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт