Ответ:
def y(x, a):
if x < 3:
return a*x-1
else:
return x+2*a
a = int(input())
x = int(input())
res = y(x, a)
print('y(x={}, a={}) = {}'.format(x, a, res))
Var x,y: real;
begin
write(' x = '); readln(x);
if x<0 then y:=sqr(x)*x+2
else y:=sqrt(x);
writeln(' y = ',y:6:4);
end.
<span>
</span>
Ответ: 1 изображение - код
2 изображение - проверка, как в задании
Код:
program school10;
Var a, b:Real;
begin
Write('Введите цену 1 кг яблок>> ');
readln(a);
Write('Введите кол-во покупаемых кг. яблок>> ');
Readln(b);
If b>2 then
Write('Стоймость яблок составит: ', b*a*0.8, ' руб.')
Else write('Стоймость яблок составит ', b*a, ' руб.');
end.
Нолики в начале я добавил чтобы легче было переводить
Var n:integer;
begin
write('n = '); readln(n);
case n of
1: writeln('один');
2: writeln('два');
3: writeln('три');
4: writeln('четыре');
5: writeln('пять');
6: writeln('шесть');
7: writeln('семь');
8: writeln('восемь');
9: writeln('девять');
10: writeln('десять');
else writeln('ошибка ввода');
end;
end.
Пример:
n = 6
шесть