С клавиатуры вводится трехзначное число. Вывести на экран удвоенную цифру единиц

Pascal.

Question

Информатика

Нила

23 марта, 10:48

С клавиатуры вводится трехзначное число. Вывести на экран удвоенную цифру единиц

Pascal.

+1

Ответы (1)

Знаете ответ на вопрос?

Авдуся · Answer 1

Var

a, b, c:integer;

begin

write ('Введите число: ') ;

readln (a) ;

b: = a mod 10 mod 10;

c:=2*b;

writeln ('Удвоенная цифра единиц: ', c) ;

readln;

end.

С клавиатуры вводится трехзначное число. Вывести на экран удвоенную цифру единицPascal.

С клавиатуры вводится трехзначное число. Вывести на экран удвоенную цифру единиц

Pascal.