Напишите программу на Pascal для решения системы уравнений:

Напишите программку на Pascal для решения системы уравнений:

Задать свой вопрос
Ванек
это не система уравнений, это - кусочно-данная функция
Ярыш Арсений
Именно поэтому я не совершенно сообразила задание и спрашиваю тут.
Егор Рубаник
скорей всего это задание на условный оператор
1 ответ
Program test;
uses crt;
var
y,x:integer;
begin
textcolor(11);
writeln('Введите x: ');
readln(x);
if xgt;2 then begin
y:=x*x;
writeln('Ответ: ', y)
end
else
begin
y:=4;
writeln('Ответ: ', y);
end;
end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт