⇢ JK
Jfhdhj Kbjjkl
Me
Mergen
uses crt;
var k:char;
begin
writeln('vvedi cheta. dla okonchania [');
repeat
k:=readkey;
if (ord(k)>57) or (ord(k)
Похожие вопросы
uses crt;
var k:char;
begin
writeln('vvedi cheta. dla okonchania [');
repeat
k:=readkey;
if (ord(k)>57) or (ord(k)