1. 

   fray New Member

   Составить программу. Сколько стоит телеграмма если в ней N слов, стоимость каждого слова m копеек, вычисление зделать в гривнах.

    

   fray, 28 янв 2010

   #1
2. 

   FoxBoy New Member

    
   Program Da;
   var N,r:integer;
   s:real;
   begin writeln('введите N');
   readln(N);
   writeln('введите r');
   readln(r);
   s:=r*n /100;
   writeln(s:5:3,' гривны');
   end.
    попробуй так. не знаю равильно ли =)

    

   FoxBoy, 28 янв 2010

   #2

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

Пароль:

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

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