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

Написать программу вычисления стоимости некоторого количества (по весу) яблок. Нижепредставлен рекомендуемый вид экрана во время работы программы (данные, введенныепользователем, выделены полужирным шрифтом).

Вычисление стоимости покупки.
Введите исходные данные:
Цена одного килограмма яблок (руб.) = 8.5
Вес яблок (кг) = 2.3
Стоимость покупки: 19.55 руб

написать на Turbo Pascal.

  1. Ответ
    Ответ дан Аккаунт удален
    program appl;
    var c,s,n:real;
    begin
    writeln('Вычисление стоимости покупки.');
    writeln('Введите исходные данные:');
    write('Цена одного килограмма яблок (руб.) = ');
    readln(c);
    write('Вес яблок (кг) = ');
    readln(n);s:=c*n;
    write('Стоимость покупки: ',s,' руб');
    end.
Самые новые вопросы