Задача №2942. Число десятков двузначного числа Данные вводятся с клавиатуры или из файла input.txt, выводятся на экран или в файл output.txt. Первые тесты не всегда совпадают с примерами из условия. Ввод Вывод 42 4
Var s:integer; begin readln(S); s:=s div 10; writeln(s); end.