Срочно помогите
Написать алгоритм и протрассировать его
На входе трехзначное число
Без массива (число нужно)
Var x,s:string;
begin cls;
read(x);
s:=1+x+1;
write(s);
end.
Оцени ответ
