С клавиатуры вводят произвольное четырехзначное число. Найти и вывести на экран, сумму второй и третьей цифр этого числа.
И вот если не сложно: 234mod100
(567div10)mod10
Var a,b,n,kol,ch:integer;begin
writeln(введите число);
readln(n);
ch:=n;
n:=n div 10;
a:=n mod 10;
b:=a;
n:=n div 10;
a:=n mod 10;
kol:=a+b;writeln(сумма второй и третей цифр числа ,ch, ==> ,kol);
end.
234mod100=43
(567div10)mod10=6
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
