Дано целое число не равное нулю составьте программу целого положительного числа, вычислите модуль.

информатика, паскаль

Question

Информатика: Дано целое число не равное нулю составьте программу целого положительного числа, вычислите модуль. информатика, паскаль

ааааннннгггшим · Answer

ответ:

uses crt; (если используешь абс паскаль)

var n,b,k: integer;

begin

writeln ('n');

readln (n);

k: =n mod 2;

b: =n mod 10;

if k = 0 then writeln (b);

end.

объяснение: