составить программу которая вводит с клавиатуры любое число от 150 до 255 и выводит символ соответствующий этому коду

Спасибо

Ты всё таки уточни что за кодировка имелась ввиду в задании, если unicode, тогда следует заменить chr на chrunicode.

var x:integer;begin;randomize;x:=random(150,255);writeln(x);writeln(chr(x)); {не указано в какой кодировке, будем считать что это не unicode}end.