Question

Задача на Паскаль,Помогите, пожалуйста
дано N трехзначное число. Заменить первую цифру на один.

Answer 1

var  a: integer;
begin
  read(a);
  writeln(1, a mod 100);
end.