Ответ:
program z1;
var
x, y: real;
begin
readln(x);
if x <= 0 then
writeln() end;
if x <= 1 then
writeln(y:3) end;
if x > 1 then
writeln(sqr(x));
end;
end.
Число, выведенное на экран 0
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
program z1;
var
x, y: real;
begin
readln(x);
begin
if x <= 0 then
writeln() end;
begin
if x <= 1 then
writeln(y:3) end;
begin
if x > 1 then
writeln(sqr(x));
end;
end.
Число, выведенное на экран 0