Скласти програму мовою pascal.

Черкашина11 Черкашина11    2   21.11.2019 12:22    0

Ответы
evstratova05 evstratova05  10.10.2020 14:50

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика