Question

Ребята, помогите, очень очень срочно нужно))
Дано двузначное число. Найти разность между первой и второй его цифрой, используя функции Mod  и Div.

Answer 1

var a,b:real;
begin
read(b);
a:=b div 10;
b:=b mod 10;
write(a-b);
end.

Answer 2

вместо real поставь integer

Answer 3

var x: integer;
begin
write('Введите число: ');
readln(x);
write(x div 10 - x mod 10); 
end. 

Answer 4

В программе MS Word оставьте словесное описание решения задачи №1 (линейный алгоритм), пошаговый словесный алгоритм и блок-схему. Сохраните файл под именем Алгоритм1_ФИ студента.
А вот сама задача: Дано трехзначное число. Найти разность между первой и третьей его цифрой, используя функции Mod и Div.
Я не знаю, как правильно и что написать вообще..

Answer 5

Ну хорошо, спасибо большое)) А по ранее добавленной задачи, сможете помочь составить блок-схему? завтра, например)

Answer 6

Попробуйте - http://yadi.sk/d/U7B0Xk4zDFmaa

Answer 7

Спасибо огромное вам за помощь))