Информатика, опубликовано 2018-08-22 18:42:47 by Гость
Нужна помощь информатика помогите плз задача .вывести на экран числа в диапазоне от 10 до 50,которые дают остаток 0 от деления на число,введённое пользователем. пожалуйста срочно помогите
Ответ оставил Гость
Var inp,i:integer;
begin
readln(inp);
for i:=10 to 50 do
if (i mod inp=0) then write(i, );
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на