2. С клавиатуры вводится трёхзначное число. Вывести на экран двузначное число, состоящее из первой и последней цифры введенного числа. Пример: ввели число 672. Выводим на экран число 62.

program zz1;

var i, s, k, p:integer; / / задаем переменные целого типа

begin

write (' введите заданное трехзначное число ');

read (i); / / вводим с клавиатуры число

p:=i mod 10; / / находим последнюю цифру трехзначного числа

k:=i div 100; / / находим первую цифру трехзначного числа

s:=k * 10 + p; / / формируем новое двухзначное число

writeln (' полученное двухзначное число = ', s); / / выводим ответ

end.