Var x:real;
begin
read(x);
if x>0 then x:=x/2 else
x:=x*5;
write(x);
end.
На самом деле решается легко:
100 - 5 * 10;
100 - 50 = 50;
ответ: 50
решение:
250*64*1200=2343(кб)
ответ:2343кгбайта.
пожалуйста!:)
плиз,лучшее решение!:)это оочень важно-о-о!
Var y,x:real;beginwriteln('Введите значение x: ');readln(x);y:=x/2-x ;writeln('y = ',y);end.
Без жанра игры , игра не имеет смысла . Со жанром игра имеет смысл её проходит
Жанр должна быть в игре