Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

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