var c,b1,b2:integer;
begin
readln(c); // Считываем число
b1:=c mod 10; // Единицы
b2:= (c - b1) mod 100; // Десятки
write(c-b2); // Вычитаем из числа десятки
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var c,b1,b2:integer;
begin
readln(c); // Считываем число
b1:=c mod 10; // Единицы
b2:= (c - b1) mod 100; // Десятки
write(c-b2); // Вычитаем из числа десятки
end.