урок 13.1 задача 8

Primary tabs

isaac_fan's picture
Submitted by isaac_fan on Mon, 06/13/2022 - 15:07

Forums:

урок 13.1

Выведете на экран числа от 1 до 5 два раза с помощью вложенных циклов. Так чтобы в консоли было:

1 2 3 4 5
1 2 3 4 5
program Project1;
var
  i,j:integer;
begin
    for i:=1 to 5 do
      write(i,' ');
      writeln();
    for j:=1 to 5 do
      write(j,' ');


  readln();
end.
  • Log in to post comments
  • 1549 reads
vedro-compota's picture

vedro-compota

Tue, 06/21/2022 - 20:56

  1. форматирование
  2. тут не вложенные циклы - а нужны вложенные

_____________
матфак вгу и остальная классика =)

isaac_fan's picture

isaac_fan

Tue, 07/05/2022 - 16:07 

program Project1;
var
  i,j:integer;
begin
  J:=0;
  while (j<>2) do
  begin
    j:=1;
    for i:=1 to 5 do
      write(i,' ');
      writeln();
  end;


  readln();
end.
vedro-compota's picture

vedro-compota

Thu, 09/08/2022 - 20:19

сейчас цикл работает бесконечно, исправить

_____________
матфак вгу и остальная классика =)

isaac_fan's picture

isaac_fan

Mon, 09/12/2022 - 19:11 

program Project1;
var
  i,j:integer;
begin
  J:=0;
  while (j<>2) do
  begin
    j:=1;
    for i:=1 to 5 do
    begin
      j:+j+1;
      write(i,' ');
      writeln();
    end;
  end;


  readln();
end.