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

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

Задать свой вопрос
1 ответ
Var
a,a1,d:llongint;
begin
readln(a);
a1:=a div 10000;
d:=a mod 10;
writeln(a1);
writeln(b);
end.
Правда не знаю как вывести их различным цветом
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт