program massiiv1a; var tehted: array[0..2] of string; i, a, b, t: integer; begin tehted[0]:='Liida'; tehted[1]:='Lahuta'; tehted[2]:='Korruta'; randomize; for i:=1 to 10 do begin t:=random(3); a:=random(10)+11; b:=random(10)+1; writeln(tehted[t],' arvud ', a, ' ja ', b); writeln; end; end.