Var y,x: Integer;
begin
writeln('Введите x');
readln(x);
if (x>3) then y:=3*x-1
else y:=10;
writeln('Ответ, y = ', y);
end.
<span>Наполним пятилитровую банку и перельем в трехлитровую, у нас останется 2 литра, выливаем их в ведро, потом перельем обратно 3 литра в пятилитровую и наполним ее доверху ну и опять перельем в трехлитровую, у нас опять останется 2 литра их выливаем в ведро. В ведре получилось 4 литра воды</span>
Ты должна сама настроить цветовую гамму.При желании сохрани в палитре.
Сколько элементов массива больше, чем первый.
Ответ: 4