2*3*21=126 таблеток надо выпить всего
126:10=12,6 упаковок
следовательно 12,6=~13
ответ 13 упаковок
Ответ:
var
a,x,b,c: real;
begin
write('Введите стоимость покупки = ');
readln(x);
a := x/100;
a := Trunc(a);
a := a*5;
b := x/50;
b := Trunc(b);
b := b*2;
c := x*0.03;
if (a>b)and (a>c)
then
writeln('RP')
else
if (b>a) and (b>c)
then
writeln('BB')
else
if (c>a) and (c>b)
then
writeln('MM')
else
writeln('Суммы равны, Алена выбирает <MM>')
end.
Сночало перо потом запитая буква е и картинка дачи
2 - зрения. 90% информации мы получаем визуально, если не ошибаюсь)
1.
var x,y:real;
begin
write('x = '); readln(x);
if x>=5
then begin y:=x*x+5; writeln('y = ',y); end
else if x<2 then begin y:=0; writeln('y = ',y); end
else writeln('Функция не определена');
end.
Пример:
x = 6
y = 41
2.
var x,y:real;
begin
write('x = '); readln(x);
if x<2
then begin y:=3/(x*x*x)-2/(x*x); writeln('y = ',y); end
else if x<=5 then begin y:=3*x*x-2*x*x; writeln('y = ',y); end
else writeln('Функция не определена');
end.
Пример:
x = 3
y = 9