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

Пожалуйста решите задачу по информатике:
Дано положительное действительное число X. Выведите его первую цифру после десятичной точки. При решении этой задачи нельзя пользоваться условной инструкцией и циклом.
В Pascal ABC или в Pascal 2.6.2(или в приблизительно в той версии) или в Python 3.4(или приблизительно в той версии)

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

var x: real;
begin 
    writeln(Введите число x: ); 
    read(x); 
    writeln(trunc(x * 10) mod 10);
end.