Помогите безотлагательно!!! Даю 25 баллов! (Составьте программу паскаль) Уличный торговец газет

Question

Помогите безотлагательно!!! Даю 25 баллов! (Составьте программу паскаль) Уличный торговец газет

Помогите срочно!!! Даю 25 баллов!
(Составьте программку паскаль) Уличный торговец газет получает а рублей с реализации каждой из первых 50 газет. С реализации каждой из остальных газет он
получает на 20% больше. Вычислите дневной заработок продавца, продающего k газет в денек.

Задать свой вопрос

Фаракхутдинов Руслан
Информатика
2019-04-02 21:59:05
0
1

1 ответ

, оставишь ответ?

Имя:*

E-Mail:

Похожие вопросы

не одежду ,а разум надобно скрашивать составить схему предложения

вычислить неопределенный интеграл (x^8-3x^5-x^2+1)x^3

от города до села 24 километра Из городка вышел человек идет

Решить уравнения:a) x^2 - 45x = 0б) 17y^2 - 5y =

слово выстроил какое лицо построил

чтобы с утра после сна перейти с пасивного состояния к активному ,

плиз!! Англ.язык Допишите общие вопросы о Коди,используя глаголы (Is... Are... Has....

В воду m=0,4кг,при t=27 градусов,опустили кусочек льда t=0 градусов.Спустя время лед

Извещенье на тему quot;письменность и книжки Киевской Русиquot;

помогите пожалуйстаизвестно , что tg a=1/2, tg B=1/3найти а)tg(A+B)б)tg(A-B)

Денис Чевардаев · Answer 1 · 2019-04-02 22:02:43+3:00

Var
    k: integer;
    a, s: real;

begin
    write('Исходная цена: ');
    readln(a);
    write('Число проданных газет: ');
    readln(k);

    if k lt;= 50 then s := k * a
    else
    begin
        s := 50 * a;
        s := s + (k - 50) * a * 1.2;
    end;
    writeln('Выручка составила ', s, ' руб.');
end.

О проекте

Помогите безотлагательно!!! Даю 25 баллов! (Составьте программу паскаль) Уличный торговец газет

Добро пожаловать!