Pascalda soldan sağa \'merhaba\' yazan program.
not:merhaba yazısını değiştirebilirsiniz fakat değiştirdiğiniz karakter sayısını 80\'den çıkarıp forun yanına yazınızki çıktı düzgün olsun...
=========================================================
uses crt;
var;
m:string;
a,i:integer;
begin
m:='merhaba';
a:=1;
for i:=1 to 73 do begin
clrscr;
a:=a+1;
gotoxy(a,5);write(m);delay(100);
end;
readln;
end.
not:merhaba yazısını değiştirebilirsiniz fakat değiştirdiğiniz karakter sayısını 80\'den çıkarıp forun yanına yazınızki çıktı düzgün olsun...
=========================================================
uses crt;
var;
m:string;
a,i:integer;
begin
m:='merhaba';
a:=1;
for i:=1 to 73 do begin
clrscr;
a:=a+1;
gotoxy(a,5);write(m);delay(100);
end;
readln;
end.
