** Шахматни фигури

2 Responses to ** Шахматни фигури

1. Kasandrina каза:

   16 февруари, понеделник в 14:18

   program Project1;
   var
   col1,col2: char;
   red1,red2: byte;
   begin
     Write ('vavedete kordinatite na figurata:');
     ReadLn (col, red) ;
     if (col1 >= 'a' ) and (col1 <= 'h' ) then
     WriteLn ('Kolonata e validna')
     else WriteLn ('kolonata e nevalidna' );
     if (red1 >=1) and (red1 <=8 ) then
      WriteLn ('reda e validen' )
       else WriteLn ('reda e nevalide' ) ;
     if (col2 >= 'a' ) and (col2 <= 'h' ) then
     WriteLn ('Kolonata e validna')
     else WriteLn ('kolonata e nevalidna' );
     if (red2 >=1) and (red2 <=8 ) then
      WriteLn ('reda e validen' )
       else WriteLn ('reda e nevalide' ) ;
     RreadLn
   end.

   Влезте, за да отговорите
   • Данаил каза:

     02 март, понеделник в 23:18

     Браво Касандрина! Като логика проверката за колоната и реда е вярна, но програмата няма да компилира така, както си я качила.

     Влезте, за да отговорите