1
2
3
4
5
6
7
8
9
program tablica;
var
   sat,minut,i,m:integer;
begin
for i:=13 to 17 do begin
sat:=1;
for m:=5 to 50 do begin
minut:=m;
write (sat:minut);
 ...

1
2
3
4
5
6
7
8
9
program tablica;
var
   sat,minut,i,m:integer;
begin
for i:=13 to 17 do
for m:=5 to 50 do begin
sat:=i;
minut:=m;
write (sat:minut);
 ...

1
2
3
4
5
6
7
8
9
program tablica;
var
   i,j:integer;
begin
for i:=3 to 7 do begin
for j:=3 to 7 do
write(i*j:3);
end;
end.

1
2
3
4
5
6
7
8
9
program tablica;
var
   i,j:integer;
begin
for i:=3 to 7 do begin
for j:=3 to 7 do
write(i*j:3);
writeln;
end;

1
2
3
4
5
6
7
8
9
program tablica;
var
   i,j:integer;
begin
for i:=3 to 7 do begin
for j:=3 to 7 do
write(i*j:3);
writeln;
end;

1
2
3
4
5
6
7
8
9
program tablica;
var
   i,j:integer;
begin
for i:=3 to 7 do begin
for j:=3 to 7 do
write(i*j);
writeln;
end;

1
2
3
4
5
6
7
8
9
program tablica;
var
   i,j:integer;
begin
for i:=3 to 7 do begin
for j:=3 to 7 do
write(i*j:3);
writeln;
end;

1
2
3
4
5
6
7
8
9
program tablica;
var
   i,j:integer;
begin
for i:=3 to 7 do begin
for j:=3 to 7 do
write(i*j:3);
end;
end.

1
2
3
4
5
6
7
8
9
program tablica;
var
   i,j:integer;
begin
for i:=3 to 7 do begin
for j:=3 to 7 do
write(i*j:3);
writeln;
end;

1
2
3
4
5
6
7
8
9
program tablica;
var
   i,j:integer;
begin
   for i:=3 to 7 do
      begin
         for j:=3 to 7 do
            write(i*j);
         writeln;
 ...

1
2
3
4
5
6
7
8
9
program tablica;
var
   i,j:integer;
begin
   for i:=3 to 7 do
      begin
         for j:=3 to 7 do
            write(i*j:3);
         writeln;
 ...

1
2
3
4
5
6
7
8
9
program tablica;
var
   i,j:integer;
begin
   for i:=3 to 7 do
      begin
         write(i);
         for j:=3 to 7 do
            write(i*j:3);
 ...

1
2
3
4
5
6
7
8
9
program tablica;
var
   i,j:integer;
begin
   write(' ');
   for i:=3 to 7 do
      write(i:3);
   writeln;
   for i:=3 to 7 do
 ...

1
2
3
4
5
6
7
8
9
program vreme;
var
i,m,r:integer;
begin
for i:=3 to 7 do 
for m:=3 to 7 do begin
r:=i*m;
writeln(r);
end;

1
2
3
4
5
6
7
8
9
program vreme;
var
i,m,r:integer;
begin
i:=3; 
for m:=3 to 7 do begin
r:=i*m;
writeln(r);
end;

1
2
3
4
5
6
7
8
9
program vreme;
var
i,m,r:integer;
begin
for i:=3 to 7 do 
for m:=3 to 7 do begin
r:=i*m;
writeln(r);
end;

1
2
3
4
5
6
7
8
9
program vreme;
var
i,m,r:integer;
begin
for i:=3 to 7 do begin
for m:=3 to 7 do
r:=i*m;
writeln(r);
end;

1
2
3
4
5
6
7
8
9
program vreme;
var
i,m,r:integer;
begin
for i:=3 to 7 do
for m:=3 to 7 do begin
r:=i*m;
writeln(r);
end;

1
2
3
4
5
6
7
8
9
program vreme;
var
i,m,r:integer;
begin
for i:=3 to 7 do
for m:=3 to 7 do
r:=i*m;
writeln(r);
end.

1
2
3
4
5
6
7
8
program vreme;
var
i,m,r:integer;
begin
for i:=3 to 7 do
for m:=3 to 7 do
write(i*m);
end.

1
2
3
4
5
6
7
8
program vreme;
var
i,m,r:integer;
begin
for i:=3 to 7 do
for m:=3 to 7 do
write (i*j);
end.

1
2
3
4
5
6
7
8
9
program vreme;
var
i,m,r:integer;
begin
for i:=3 to 7 do begin
for m:=3 to 7 do begin
r:= i*m;
end;
writeln(r);
 ...

1
2
3
4
5
6
7
8
9
program vreme;
var
i,m,r:integer;
begin
for i:=3 to 7 do
for m:=3 to 7 do
r:= i*m;
writeln(r);
end.

1
2
3
4
5
6
7
8
9
program vreme;
var
i,m,sat,minut:integer;
begin
for i:= 13 to 17 do begin
sat:=i;
for m:= 5 to 50 do begin
minut:= m;
end;
 ...

1
2
3
4
5
6
7
8
9
program EXEMPLO_WHILE_DO1;
 
Var A,B,R,I: integer;
 
begin
        while (I <=5) do
begin
  write('Escreva o valor de A: ');
  read(a);
 ...

1
2
3
4
5
6
7
8
9
program Project2;
 
{$APPTYPE CONSOLE}
 
var
 
n,n1,n2,rn1,rn2,acrn2:integer;
 
begin
 ...

1
2
3
4
5
6
7
8
9
program multiplicacao;
var 
  x,y: integer;
  r: integer;
Begin  
  readln x;
  readln y;
  r:=x*y;
  writeln r;

1
2
3
4
5
6
7
8
9
program multiplicacao;
var 
  x,y: integer;
  r: integer;
Begin  
  read x;
  read y;
  r:=x*y;
  write r;

1
2
3
4
5
6
7
8
program multiplicacao;
var x,y: integer;
  r: integer;
  read x;
  read y;
  r:=x*y;
  write r;
end.

1
2
3
4
5
6
7
program multiplicacao;
var r,x,y: integer;
  read x;
  read y;
  r:=x*y;
  write r;
end.