profile
Опубликовано 5 лет назад по предмету Информатика от Marat0071

Помогите написать программу.Известно,что x кг конфет - стоит a рублей.Определить сколько стоит y кг этих же конфет,а так же сколько кг конфет можно купить на k рублей.Все значения вводит пользователь

  1. Ответ
    Ответ дан syber2013
    program konfeta;
    uses crt;
    var a,b,c,k:integer; 
       d,e,m:real;
    begin 
    clrscr; 
    write('Input (x) weight: '); 
    readln(b); 
    write('Input (a) cost: '); 
    readln(a); 
    d:=a/b; 
    write('1 kg cost ',d:2:2); 
    writeln; 
    write('Input (y)kg: '); 
    readln(c); 
    e:=c*d; 
    writeln(c ,' kg cost= ',e:2:2); 
    write('Input k rub: '); 
    readln(k); 
    m:=k/d; 
    writeln(k ,' rub cost ',m:2:2 ,' kg.'); 
    write('Press any key...'); 
    repeat until 
    keypressed;
    end.

    если надо пояснение пиши
Самые новые вопросы
Носкова Анастасия
Другие предметы - 5 лет назад

Сочинение-рассуждение. прочитайте текст. есть у меня внучка. однажды она говорит: — у веры в субботу день рождения. она

Наумова Надя
Другие предметы - 5 лет назад

Л.н. толстой. как боролся русский богатырь как сказал иван о своей силе? найдите ответ в тексте. запишите.

Сазонова Анастасия
История - 5 лет назад

Кто такой мильтиад и какова его роль в победе над персами?

Тетерина Татьяна
История - 5 лет назад

Какие примеры н. м. карамзин использует для разъяснения пользы новой системы престолонаследия? согласны ли вы с позицией

Попова Полина
География - 5 лет назад

Дополните схему. она поможет вам лучше усвоить содержание §1.: 1 что изучает география 2 с помощью чего 3 зачем изучают

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.