1. X
2. >
3. >
4. !
Искомое к.с. достигается таким вот простым набором команд!
Техника
Компьютер
Телефон
Животные
Собака
Люди
Человек
Var k:integer;
s, x, a:real;
begin
writeln('Введите цену за первые 75 газет.');
readln(a);
writeln('Введите цену за последующие газеты.');
readln(x);
k:=133;
s:=(a*75)+((133-75)*x);
writeln(s);
end.
Ответ: накопитель. к ним относятся все устройства хранения данных
Var x,y: real;
begin
write('x = ');
readln(x);
if (x>=0)and(x<=1) then y:=x*x-x
else y:=x*x-sin(pi*x*x);
writeln('y = ',y:6:4);
end.
Пример:
<span>x = 1.5
y = 1.5429</span>