Напишите программу, которая выводит на экран N (задается константой) случайных букв латинского алфавита в виде пары:

PASCALconstN = 6;var C : Char;beginfor var i := 1 to N dobeginC := Chr(Random(97,122));WriteLn(UpCase(C), C);end;end.ВТОРОЙ ВАРИАНТ ВЫПОЛНЕНИЯ ПРОГРАММЫ:Const n=6;Var ch:char;i:integer;BeginRandomize;For i:=1 to n doBeginch:=chr(random(26)+97);writeln(UpCase(ch),ch);End;readln;End.ТРЕТИЙ ВАРИАНТ ВЫПОЛНЕНИЯ ПРОГРАММЫ:program charrr;constn = 6;vari,k: integer;beginRandomize;for i := 1 to n dobegink:=random(26) + 41;writeln(chr(k),chr(k+32))endend.