Дано целое число, определить сколько в нём цифр, чему равна сумма, является ли это число четным и сколько в нем сотен? надо написать программу в Q_BASIC. всю четверть проболела, очень нужна помощь(
dim a,b,n,s as integer
input a
b=a
n=0
x=0
do
b=b10
x=b mod 10 +x сумма цифр
n=n+1 сколько цифр
loop until b<>0
print n, x
if a mod 2 = 0 then print ("четное") else print ("нечетное")
a=a mod 100 сколько сотен
print a
я не помню точно синтаксис фуникций input и print, так что проверь
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
