СРОЧНО!СРОЧНО!СРОЧНО! дано трёхзначное число напишите программу выводящую двузначное...

Question

СРОЧНО!СРОЧНО!СРОЧНО!
дано трёхзначное число напишите программу выводящую двузначное число состоящие из первой и третьей цифры числа

Answer 1

Var
  x,y: integer;
begin
  write('Введите число X: ');
  readln(x);
  y:=(x div 100)*10+x mod 10;
  writeln(y);
end.