1. 

   Pakich_by New Member

   Составь процедуру, которая запрашивает у пользователя два числа (X и Y) и выводит значение выражения 12x -7y

    

   Pakich_by, 29 янв 2010

   #1
2. 

   Slava_by New Member

   var x,y:integer;
   procedure xy(x:integer;y:integer);
   begin
   writeln('Vvedite x,y');
   readln(x,y);
   writeln('Otvet = ', 12*x-7*y);
   end;
   begin cls;
   xy(x,y);
   readln;
   end.

    

   Slava_by, 29 янв 2010

   #2

Ваше имя или e-mail:

Пароль:

Забыли пароль?

Запомнить меня