Question

Выведете на экран все числа от 1 до 100 с помощью цикла (2 мя способами) в Лазарус простая программа

Answer 1

Если тебе нужен питон, то вот:

a = 1

while a <= 100:

print(a)

a+=1

Answer 2

Конечно! Вот два примера программы на языке Pascal (используется в среде разработки Lazarus), которые выводят все числа от 1 до 100 с помощью циклов:

Пример 1: Использование цикла "for"

pascalCopy code
program OutputNumbersForLoop;

var
  i: integer;

begin
  for i := 1 to 100 do
  begin
    writeln(i);
  end;
end.

Пример 2: Использование цикла "while"

pascalCopy code
program OutputNumbersWhileLoop;

var
  i: integer;

begin
  i := 1;
  while i <= 100 do
  begin
    writeln(i);
    Inc(i);
  end;
end.

Оба этих примера будут выводить числа от 1 до 100 в окне консоли. Вы можете выбрать любой из них для своей программы в среде Lazarus. Просто скопируйте код в окно вашего проекта, скомпилируйте и запустите программу, чтобы увидеть результат.