Предмет: Информатика,
автор: igoryavorskiy007
HELP!!!Помогите!! Скласти програму мовою Pascal.
Приложения:

Ответы
Автор ответа:
1
Ответ:
begin
var x, y, z: real;
Writeln('введите исходные данные:');
Write('x= ');
Read(x);
Write('y= ');
Read(y);
if x + y < -10
then z := x * x + y * y
else if x + y > 5
then z := Sqrt(x + y)
else z := 2 * x - y;
Writeln('z= ', z);
end.
igoryavorskiy007:
спасибо
Похожие вопросы
Предмет: Математика,
автор: alekceyzybarev4150
Предмет: Математика,
автор: Yava2410
Предмет: Алгебра,
автор: raufov1315
Предмет: История,
автор: nik99n1999
Предмет: Математика,
автор: felix15