Составте программку:Посреди двузначных чисел отыскать кол-во чисел которые неоканчиваются на ноль

Составте программку:
Посреди двузначных чисел отыскать кол-во чисел которые неоканчиваются на ноль и кратных трём , с разъяснением Безотлагательно!

Задать свой вопрос
Жека Киркель
var n,k: integer; begin k:=0; n:=12; repeat if (n mod 10)>0 then k:=k+1; n:=n+3; until n>99; writeln('количество: ',k); end.
1 ответ
K=10s=0for i in range(10,99):    if k%10!=0 and k%3==0:        s=s+1    k=k+1print(s)
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт