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.
Использовать Чертежник
алг
нач
опустить перо
сместиться на вектор(-2,0)
сместиться на вектор(2,2)
сместиться на вектор(0,-4)
<span>кон</span>
Ответ:
5148(10)
Объяснение:
Предположу, что 1011 в двоичной
(175(16)+137(8))*1011(2)=(1*16²+7*16¹+5*16⁰+1*8²+3*8¹+7*8⁰)*(1*2³+0*2²+1*2¹+1*2⁰)=(256+112+5+64+24+7)*(8+0+2+1)=468*11=5148(10)
Var a, b, x : real;
Begin
Write('Введите а: ');
Readln(a);
Write('Введите b: ');
Readln(b);
X := -b + b * b - 4 * a * b / 2 * a;
Write('x = ', x : 0 : 2);
Readln;
End.
1. 1
2 3
3. 1) 2
2) 3
3) 1
4. 2
5. 3
6. 1
7. 1 и 4
8. 3
9. 4
10. 2
11. 2
12. 1
13. 4
14. 4
15. 2
16. 1