Turbo Pascal Kaynak Kodlar

[dapHne]

Bu bölüme kaynak kodlarınızı gönderebilirsiniz.

Çift Tek ve Sözlük adlı iki kaynak kodu yüklemek için tıklayın.
Linki görüntüleyebilmek için <a href="%2$s"><strong>Üye</strong></a> olmanız gerekiyor.

[cruell]

uses crt;
var
i,j:byte;
begin
clrscr;
for i:=1 to 10 do
begin
writeln;
for j:=1 to 10 do
write(i,'*',j,'=',i*j:2,' ' );
end;
readln;
end.