Проездной в троллейбусе стоит X рублей.Вы ездите без билета.Штраф за безбилетный проезд состовляет С рублей. Вас в месяц оштрофавали 5 раз.
10-11 класс
|
Опредилите, выгодно ли было вам ездить без билета.
uses crt;
var
x,c:real;
begin
write('Сколько стоит проездной? '); read(x);
write('Вы ездите без билета. Сколько составляет штраф? '); read(c);
write('За безбилетный проезд Вас оштрафовали за месяц на ',5*c,' рублей.');
if (5*c>x) then write('Это невыгодно. Купите проездной.')
else write('Это выгодней, чем покупать проездной каждый месяц.');
end.
Program Alimka1908;
uses crt;
var
x,c:real;
begin
write('Введите стоимость проездного '); readln(x);
write('Введите сумму штрафа '); readln(c);
writeln('В этом месяце Вас оштрафовали 5 раз на общую сумму ',5*c,' рублей.');
writeln();
if (5*c>x) then
writeln('Ездить зайцем невыгодно. Купите себе проездной')
else
writeln('Вы удачливый заяц - Вам это выгодней, чем тратить деньги на проездной');
end.
Другие вопросы из категории
водоема, предназначенное для стоянки кораблей.
Читайте также
включено B мегабайт трафика. Неизрасходованные мегабайты в конце месяца «сгорают». Если трафик превышает B мегабайт, то каждый мегабайт трафика сверх предоплаченных стоит C рублей.
Расположить эти носители по возрастанию стоимость за 1 байт.А)D F C Б)D C F В) F D C Г)F C D
Количество ввести при помощи оператора READ/
переменных A и N не превосходят 30000, а значение переменной B не превосходит 100. Переменные С1 и С2 имеют тип longint. Другие переменные не использовать.
Батон стоит 3 рубля. Булка стоит 4 рубля. У нас в наличии 4 кг муки и 0,2 кг сахара. Составьте оптимальный план выпечки батонов и булок.