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

Публикувано на 27 януари, петък от Данаил

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

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

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

  1. kaloyan каза:
    27 януари, петък в 11:19 
     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.

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