Предмет:
ИнформатикаАвтор:
mindydyerVar y,x: Integer;
begin
writeln('Введите x');
readln(x);
if (x>3) then y:=3*x-1
else y:=10;
writeln('Ответ, y = ', y);
end.
Автор:
avery3uf8Добавить свой ответ
Предмет:
ХимияАвтор:
aarónsmithОтветов:
Смотреть
Предмет:
Физкультура и спортАвтор:
midnightbqrqОтветов:
Смотреть
Предмет:
МатематикаАвтор:
ellav69pОтветов:
Смотреть