Question

Паскаль!!!ввести все трехзначные числа,делящиеся на 15. Пожалуйста.

Answer 1

Var i,k:integer;beginfor i:=100 to 999 dobegink:=i mod 15;if k=0 then writeln(i);end;end.

Answer 2

Конечно! Я могу помочь вам с написанием программы на языке Паскаль, которая будет выводить все трехзначные числа, делящиеся на 15.

Вот пример программы на Паскале, которая решает эту задачу:

program DivideBy15;

var
  number: integer;

begin
  for number := 100 to 999 do
  begin
    if number mod 15 = 0 then
      writeln(number);
  end;
end.

В этой программе используется цикл `for`, который перебирает все трехзначные числа от 100 до 999. Затем, с помощью оператора `mod`, проверяется, делится ли число на 15 без остатка. Если да, то число выводится на экран с помощью процедуры `writeln`.

Вы можете скопировать этот код и вставить его в среду разработки, которая поддерживает язык Паскаль, например, Free Pascal или Turbo Pascal. После компиляции и выполнения программы, вы увидите все трехзначные числа, делящиеся на 15.

Надеюсь, это поможет вам решить вашу задачу! Если у вас есть еще вопросы, пожалуйста, дайте мне знать.