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

Pascal.

Question

Информатика

Даниила

30 августа, 07:16

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

Pascal.

+2

Ответы (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.