Question

Паскаль как вывести 1 2 34 5 6итак до 30

Answer 1

program Z1;

var i: integer;

begin

for i:=1 to 30 do

writeln(i);

readln;

end.

Answer 2

Для вывода чисел "1 2 34 5 6" по порядку до 30 в языке программирования Паскаль, вы можете использовать следующий код:

pascalCopy code
program PrintNumbers;
var
  i: integer;
begin
  i := 1;
  while i <= 30 do
  begin
    if (i = 3) or (i = 6) then
      write('34 ')
    else
      write(i, ' ');
    Inc(i);
  end;
end.

Этот код использует цикл while для перебора чисел от 1 до 30. Внутри цикла проверяется, равно ли i 3 или 6. Если это так, то выводится "34 ", иначе выводится само число i с пробелом. Таким образом, числа "1 2 34 5 6" будут выведены по порядку до 30.