Question

Вывести первые 15 натуральных чисел кратных 5. В паскале Очень срочно нужно !!!!!

Answer 1

Ответ:

int n; //обьявить переменную целую

for(int i=0; i<15;i++) прогнать по циклу от 1 до 15

{cin >> n;  ввести число

if(n%5==0) проверить кратно ли число 5 (в паскале вроде mod)

 {cout << n << " ";} если условие верное вывести n и пробел

Объяснение:

это решение на с++, но если ты знаешь конструкцию то попробуй перевести на паскаль, надеюсь ты справишься, удачи

Answer 2

Конечно, вот программа на Pascal, которая выводит первые 15 натуральных чисел, кратных 5:

pascalCopy code
program NaturalNumbersMultiplesOf5;
var
  i, count: integer;
begin
  count := 0;
  
  writeln('Первые 15 натуральных чисел, кратных 5:');
  
  for i := 1 to 100 do // Начинаем с 1 и идем до большого числа, чтобы учесть все кратные 5
  begin
    if (i mod 5 = 0) then // Проверяем, кратно ли текущее число 5
    begin
      write(i, ' ');
      Inc(count);
      
      if count = 15 then // Если вывели 15 чисел, завершаем цикл
        break;
    end;
  end;
  
  readln;
end.

Эта программа будет выводить первые 15 натуральных чисел, кратных 5, и затем завершит выполнение.