сервис вопросов и ответов1.Дано натуральное число : 1) найти количество цифр данного числа
5-9 класс|
|
2) Верно ли что данное число оканчивается на нечетную цифру
Yannech123
18 янв. 2017 г., 16:08:46 (7 лет назад)
Artemluchin
18 янв. 2017 г., 18:54:05 (7 лет назад)
на паскале:
var
n,s,p:integer;
begin
read(n);
p:=n mod 10;
if p mod 2=0 then writeln ('оканчивается на четную цифру')
else writeln ('оканчивается на четную цифру');
while n>0 do
begin
n:=n div 10;
s:=s+1;
end;
writeln ('количество цифр в числе', s);
end.
Ответить
Другие вопросы из категории
Получить числа А,В и записать в прямом двоичном коде.
1) А=-100+12
В=-20+5
2) Выполнить процесс сложения чисел в обратном коде
3) выполнить процесс сложения чисел в дополнительном коде
4) Сложить числа -100 и -50, объяснить результат
Читайте также
Ребятки!!!!ПОмогите пожалуйста очень срочно!!!! Дан файл f компоненты которого действительные числа.Найти сумму компонентов
файла.Результат поместить в файл g.
дан файл f компоненты которого являются целыми числамию Найти наибольший и наименьший из компонентов файла.результат поместить в файл g
ДАн файл f компоненты которого являются целыми числами найти количество чётных чисел среди компонентов.результат поместить в файл g
Дан файл F компоненты которого являяются целыми числами.записать в файл g все чётных числа файла f
Дан файл F компоненты которого являяются целыми числами переписать компоненты файла f в файл g,так чтобы в файле сначала шли отрицательные а потом положительные числа.
дано целое 4 значное число.Найти среднеарифметическое цифрю Дано время в секундах.сколько секунд осталось до следующей минуты. Найти
площадь круга если дан радиус 1 и радиус 2
Запишите на языке ПаскальЗапишите на языке Паскаль программу,которая для произвольного двузначного числа определяет:а) сумму и произведение его
цифр;б) число,образованное перестановкой цифр исходного числа. Срочно надо
ПОМОГИТЕ В ЧЕМ ОШИБКА!!
program ZADACHA1;
var
a,b,c,d,d1,e:integer;
x,y,k,l:real;
begin
WRITELN('Цыбулак Максим');
READLN(a);
READLN(b);
c:=a+b;
e:=a*b;
d:=a-b;
k:=a/b;
d1:=b-a;
l:=b/a;
WRITELN('a+b=',c);
WRITELN('a-b=',d);
WRITELN('b-a=',d1);
WRITELN('a*b=',e);
WRITELN('a/b=',k);
WRITELN('b/a=',l);
m;=SQR(a);
n;=SQR(b);
o;=SQRT(a);
p;=SQRT(b);
WRITELN('квадрат числа',a,'=',m);
WRITELN('квадрат числа',b,'=',n);
WRITELN('корень числа',a,'=',o);
WRITELN('корень числа',b,'=',p);
end.
1)найти количесво делителей натурального числа,сколько из них чётных? 2) дано натуральное число: найти две первые цыфры числа
верно ли,что первая цыфраа данного числа чётная?
3)найти все трёхзначные числа,которые состоят из разных цыфр,а их сумма равна А(А вводится с клавиатуры)
4)найти все симметричные натуральные числа(палиндромаиз промежутка от А до В(А и В вводится с клавиатуры)
Вы находитесь на странице вопроса "1.Дано натуральное число : 1) найти количество цифр данного числа", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.