Что делает эта программа(паскаль)..???срочно нужно Var N, A, B, C: Integer; Begin Write ('Введите двузначное число больше '); Readln (N); A:=N mod 10; B:=N div 10; C:=B-A; Writeln ('Результат больше ', C); End.
Что делает эта программа(паскаль)..???срочно нужно
Var
N, A, B, C: Integer;
Begin
Write ('Введите двузначное число > ');
Readln (N);
A:=N mod 10;
B:=N div 10;
C:=B-A;
Writeln ('Результат > ', C);
End.
Гость
Ответ(ы) на вопрос:
Гость вычисляет разность x - y при введенном числе xy и выводит результат.
Например, ты вводишь 32, она выводит 1 (т. к. 3 - 2 = 1)
Не нашли ответ?
Похожие вопросы