MyKaBuS adlı üyeden alıntı: mesajı görüntüle
uses crt;
var
a:string;
begin
writeln("Teşekkürler Bu Güzel Bilgiler için. +rep ");
readln(a);
end.
rica ederim ama a değişkeni fazlalık olmuş boşa ram i yormamak gerek