Квадрати от числа

Публикувано на 02 май, сряда от Данаил

Да се въведе число N и да се отпечатат на екрана квадрати от числа. Например при въвеждане на N=4 да се отпечата следното:

Първи вариант:
4 4 4 4
4 4 4 4
4 4 4 4
4 4 4 4

Втори вариант:
1 2 3 4
1 2 3 4
1 2 3 4
1 2 3 4

Трети вариант:
1 2 3 4
2 3 4 5
3 4 5 6
4 5 6 7

Публикувано в 9в с етикети . Постоянна връзка.

7 Responses to Квадрати от числа

  2. kaloyan каза:
    03 май, четвъртък в 08:50 
    VAR i,i1,n,chislo : integer;
BEGIN
write('vavedi chislo: '); readln(n);
//parvi variant
writeln('PARVI VARIANT');
for i:=1 to n do begin
  for i1:=1 to n do
    write(n,' ');
    writeln;
end;
writeln;
//vtori variant
writeln('VTORI VARIANT');
for i:=1 to n do begin
  for i1:=1 to n do
      write(i1,' ');
      writeln;
end;
writeln;
//treti variant
writeln('TRETI VARIANT');
for i:=1 to n do begin
  for i1:=i to 2*i-1 do
    write(i1,' ');
    writeln;
end;
readln;
END.
  4. Xboxx_ каза:
    03 май, четвъртък в 10:32 
    program Project1;

var i,j, n: integer;

begin
Write ('Vuvedete chislo') ;
Readln (n);
for i:=1 to n do
begin
for j:=1 to i do
Write (j, '');
Writeln ;
 end;
 readln ;
end.
  5. Xboxx_ каза:
    03 май, четвъртък в 10:37 
     program Project1;

var i,j, n: integer;

begin
Write ('Vuvedete chislo:') ;
Readln (n);
for i:=(1) to n do
begin
for j:=(1) to n do
Write (n, '');
Writeln ;
 end;
 readln ;
end.

Вашият коментар