Решить задачу ** паскале дано число найти сумму первой и последней цифры числа. Вывести...

Question

Решить задачу на паскале дано число найти сумму первой и последней цифры числа. Вывести их разным цветом

Answer 1

Var
a,a1,d:llongint;
begin
readln(a);
a1:=a div 10000;
d:=a mod 10;
writeln(a1);
writeln(b);
end.
Правда не знаю как вывести их разным цветом