Ответы
Ответ дал:
1
Ответ:
сейчас напишу
Объяснение:
5 минут пожалуйста
21062007nastia:
Ок, пиши в комменты
Не факт что правильно, я больше по C#
Но:
var
x, y: integer;
begin
write ('x = ');
readln (x);
if x > 0 then
y := x + 3
else
if x = 0 then
y := 0
else
y := abs(x);
writeln ('y = ', y);
end.
x, y: integer;
begin
write ('x = ');
readln (x);
if x > 0 then
y := x + 3
else
if x = 0 then
y := 0
else
y := abs(x);
writeln ('y = ', y);
end.
спасибо
Не за что)
Вас заинтересует
1 год назад
7 лет назад
8 лет назад
8 лет назад