На колко години ще сме

Напишете програма, която съдържа като константа коя година сме сега, пита ви на колко години сте сега, пита ви за произволна друга година и извежда на колко години ще сте през тази друга година.

Публикувано в . Постоянна връзка.

Един коментар по На колко години ще сме

  1. kaloyan каза:
     CONST
      tekushta = 2012;
    VAR
      vazrast, druga, vazrast2 : integer;
    BEGIN
    
      write('vavedi godinite si: ');
      readln(vazrast);
    
      write('vavedi drugata godina: ');
      readln(druga);
    
      vazrast2:=((druga-tekushta)+vazrast);
    
      writeln('prez ',druga,' 6te bade6 na ',vazrast2,' godini');
    
    readln;
    END. 

Вашият коментар