сервис вопросов и ответовРешить на языке паскаль: Верно ли, что в числе есть цифра 5
10-11 класс|
|
СашаКапрал
24 окт. 2015 г., 20:52:39 (8 лет назад)
Cvetoshka
24 окт. 2015 г., 21:40:39 (8 лет назад)
var a,n:integer;
begin
write('Введите число: ');
readln(n);
repeat
a:=n mod 10;
n:=n div 10;
until (n=0) or (a=5);
if a=5 then write('В этом числе есть цифра 5') else write('В этом числе нет цифры пять')
end.
Ответить
Другие вопросы из категории
Заполнить массив из 10 элементов случайными числами в интервале [-10..10] и найти в нем два максимальных элемента и их номера. Пример: Исходный массив:
.. максимальные a[4]=10, a[7]=8
Даны два числа Y и Z. Большее из этих двух чисел заменить их полусуммой, а меньшее удвоенным произведением.
Надо написать на Паскале
Помогите, пожалуйста, решить задачу!
Вычислить сумму всех элементов двумерного массива.
Напишите, пожалуйста, программу.
Читайте также
4 задачи: ввести натуральное число и определить, верно ли, что сумма цифр равна 10 (через repeat и until)//// ввести натуральное
число и определить, какие цифры встречаются несколько раз (через repeat и until)///
ввести целое число и найти сумму его цифр (через while)
ввести целое число и определить , верно ли, что в его записи есть две одинаковые цифры(через while)
всё через паскаль абс
3. Не используя функцию возведения в квадрат, напишите на языке Паскаль наиболее короткие алгоритмы вычисления а) y=x¹° б)y=x¹⁵ или а) y=x^10
б)y=x^15
Постараться использовать минимальное количество дополнительных переменных.
4. Запишите на языке Паскаль программу циклического обмена значениями трёх переменных a,b,c. Схема циклического обмена: a ← b ← c. Например, если до обмена было: a=1, b=2, c=3, то после обмена должно стать: a=2, b=3, c=1.
1)Вычислить значения функции y=4*x^3-2*x^2+5 для x, изменяющегося от -3 до 1 с шагом 0,1 на языке ПАСКАЛЬ!!СРОЧНОО ЗАВТРА ЭКЗАМЕН РЕБЯЯТКИ!
2)Найти количество всех нечетных чисел на интервале от 11 до 20
3)Найти сумму целых положительных четных чисел на интервале от 1 до 100
4)Найти сумму ряда,общий член которого равен А(х)=1/(3*N-2)*(3*N+1)
5)Дано произвольное число n≤100.Определить количество цифр в числе
ОЧЕНЬ НУЖНО!!НА ЯЗЫКЕ ПАСКАЛЬ!ВЫРУЧАЙТЕ!
Написать программу на Паскале. Дано четырехзначное натуральное число. Найти количество цифр данного числа, большие цифры А (А вводит пользователь) и
определить, верно ли, что данное число кратно 3.
Вы находитесь на странице вопроса "Решить на языке паскаль: Верно ли, что в числе есть цифра 5", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.