44

Ребятки, помогите пожалуйста!

hpcname 10 августа 2022

Ребятки, помогите пожалуйста! Нужно решить задачку с помощью программирования языка ПаскаляНайдите любое трехзначное число, кратное заданному P и не равное ему.

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

39

Uses crt; var i,n,p: integer; beginread (p); i: =100; while i <= 999 dobeginif (i mod p=0) and (i<>p) thenbeginn: =i; break; end; inc (i); end; writeln (n); end.

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

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