Към bezplatno.info портал | Галерия | Сайтове | Чат | Цитати | #bezplatno.info @ uniBG | Филми | Футбол | Качване на картинки | Health and weight loss
 Въпроси/Отговори ::  Търсене ::  Потребители ::  Потребителски групи ::   Регистрирайте се ::  Вход 


Google
 





- А стига бе, стабилен Shell и то с SMS?
- Ахам, при нашия спонсор Forci.com!

Pascal - обмяна на лева в евро
 
Създайте нова тема   Напишете отговор
Безплатни домейни Форуми » IT Уроци
Предишната тема :: Следващата тема  
Автор Съобщение
ckunap
Бедняк
Бедняк


Регистриран на: 14 Фев 2011
Мнения: 6

6 Домейн Точки

МнениеПуснато на: Вто Фев 15, 2011 6:53 pm    Заглавие: Pascal - обмяна на лева в евро Отговорете с цитат

"B лева - ...... евро", където на мястото на B е въведена сумата в лева, а след тирето е изчислена сумата в евро.

Код:
var
U,B:real;
begin
write('vuvedete kurs na evroto : ');readln(U);
write('vuvedete suma v leva : ');readln(B);
write(B:1:3,' leva - ',B/U:1:3, ' evro');
end.
Вижте профила на потребителя Изпратете лично съобщение
Sponsor
Покажи мнения от преди:   
Безплатни домейни Форуми » IT Уроци Часовете са според зоната GMT + 2 Часа
Създайте нова тема   Напишете отговор
Страница 1 от 1

 
Идете на:  
Не Можете да пускате нови теми
Не Можете да отговаряте на темите
Не Можете да променяте съобщенията си
Не Можете да изтривате съобщенията си
Не Можете да гласувате в анкети
SMS Реклама
receptite.co.cc | dietichno.com | WWW.OBQVI.US | bg-download.info | mmo-bg.com | mmo-bg.com.knigite | www.Flirtovete.com | Simpatiagi.com | kolelo.net | FILMI.be | 
Към bezplatno.info портал | Галерия | Сайтове | Чат | Цитати | #bezplatno.info @ uniBG | Филми | Футбол | Качване на картинки | Health and weight loss