Question

y=x^2,если x 0
Напишите программу для Паскаля
Используя (then и else)

Answer 1

Ответ:

Var y, x: integer;

begin

Writeln("введите число");

readln(x)

if x=0 them

y=x*x;

end