Предмет: Информатика, автор: igoryavorskiy007

HELP!!!Помогите!! Скласти програму мовою Pascal.

Приложения:

Ответы

Автор ответа: Ziorar
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: спасибо
Ziorar: всегда пожалуйста )
Sadika15c: добрый вечер!Хотела спросить,работаете ли вы с Бейсик?
Sadika15c: просто возможно я буду задавать вопросы по Q Бейсик
Sadika15c: а не кто,не пишет на бейсике(((
Похожие вопросы
Предмет: Математика, автор: alekceyzybarev4150
Предмет: Математика, автор: Yava2410
Предмет: Алгебра, автор: raufov1315
Предмет: Математика, автор: felix15