Информатика, опубликовано 2018-08-22 21:41:32 by Гость
Написать программу если x меньше 0, то найти x^2. Иначе x уменьшить в 2 раза.
Ответ оставил Гость
{PASCAL}
var x:real;
begin
write(Введите число: );
readln(x);
if xelse x:=x/2;
writeln(x:4:1);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.