Помогите пожалуйста Напишите программы для решения задач. Используйте операции div и mod. 1) задано двухзначное число. Найдите разность между количеством десятков и единиц. 2) площадь участка...

Вам нужно узнать решение и ответ на вопрос Помогите пожалуйста Напишите программы для решения задач. Используйте операции div и mod. 1) задано двухзначное число. Найдите разность между количеством десятков и единиц. 2) площадь участка... и правильно выполнить домашнюю работу по предмету Информатика? Готовое решение смотрите далее.

Помогите пожалуйста
Напишите программы для решения задач. Используйте операции div и mod.
1) задано двухзначное число. Найдите разность между количеством десятков и единиц.
2) площадь участка измеряется в арах. Найдите количество полных км².

1)
var
a:integer;
begin
writeln('Введите число: ');
readln(a);
Writeln(n div 10 - n mod 10)
end.
2)
var
a:real;
begin
writeln('Площадь в ар.: ');
Read(a);
Writeln('Кв,км: ',Trunc(a/10000))
end.

Подобные ответы

Закон исключения констант. Информатика
Закон исключения констант. Информатика
Помогите. Очень срочно нужно помощь
Помогите. Очень срочно нужно помощь
НАПИШИТЕ ПОЖАЛУЙСТА!!!
НАПИШИТЕ ПОЖАЛУЙСТА!!!
Напишите программу печати таблицы перевода аршинов в метры для значения веса от 1 до 15 аршиерв.1 аршин равен 0,7112м
Напишите программу печати таблицы перевода аршинов в метры для значения веса от 1 до 15 аршиерв.1