С клавиатуры вводится трехзначное число. Вывести на экран удвоенную цифру единиц
Pascal.
Var
a,b,c:integer;
begin
write(Введите число: );
readln(a);
b:= a mod 10 mod 10;
c:=2*b;
writeln(Удвоенная цифра единиц: ,c);
readln;
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
