Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 976 ответов!

Написать программу Паскаль))) срочно!)))

10-11 класс

Ввести с клавиатуры натуральное число.написать программу, которая определяет, кратна ли сумма его цифр 6.

Gevorgyanarpik 06 нояб. 2013 г., 13:39:17 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Даша29
06 нояб. 2013 г., 16:26:38 (10 лет назад)

var
a, sum: integer;
begin
readln(a);
while a > 0 do begin
sum := sum + a mod 10;
a := a div 10
end;
writeln('Сумма цифр: ', sum);
if(sum mod 6 = 0) then writeln('Сумма цифр кратна 6')
else writeln('Сумма цифр не кратна 6');
end.

Ответить

Другие вопросы из категории

что понимается под таблицей
Ввести массив F(n) вещественных

чисел. Если последний элемент массива положительный, то найти max среди
элементов массива и заменить его значений последний элемент массива. Массив
распечатать. Иначе – дать сообщение «Массив остался без изменений»

Читайте также

Помогите написать программу в паскале. Задание:На плоскости даны 2 точки А (х1; у2) и В (х2; у2), определить какая из них находится дальше от начала коо

рдинат. Я поняла, что нужно найти их длины (формулы я знаю), а правильно написать программу не могу

Помогите написать программу по Информатике! Найти произведение двузначных нечетных чисел, кратных

13.

Нужно написать программу на цикле с предусловием, на Паскале.

Написать Программу в паскале которая посчитала бы 5^123 (это цикл как бы должен быть)

http://primat.org/index/0-128 вот сайт что бы написать программу.

Написать программу ПАСКАЛЬ вычисления расстояния между населёнными пунктами. 1)Вычислите расстояние между населёнными пунктами. 2)введите

исходные данные

3)масштаб карты 120 (кол-во км в одном см)

4)расстояние между точками изображающими населённые пункты если между ними 3.5 (см)...(должно выйти 420км)

5) расстояние между насел. пунктами ... км

Напишите пожалуйста программу. К завтрашнему дню надо. С Паскалем проблемы



Вы находитесь на странице вопроса "Написать программу Паскаль))) срочно!)))", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.