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

Помогите написать программу на Паскале.

5-9 класс

Напишите программу, которая в последовательности целых чисел
вычисляет сумму всех чисел, которые кратны 6 или 11. Программа получает на вход
целые числа, количество введённых чисел неизвестно, последовательность чисел
заканчивается числом 0 (0 – признак окончания ввода, не входит
в последовательность).

Количество чисел не превышает 1000. Введённые числа по
модулю не превышают 30 000.

Программа должна вывести одно число: сумму всех чисел,
которые кратны 6 или 11.






LeonelMessi 24 июня 2014 г., 9:37:57 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
KUSKA1234
24 июня 2014 г., 12:20:21 (9 лет назад)

uses crt;
var a,sum:integer;
begin
     sum:=0;
     repeat
           read(a);
           if (a mod 6=0) or (a mod 11=0) then sum:=sum+a;
     until a=0;
     writeln(sum);
end.

Ответить

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

Метеорологическая станция ведет наблюдение за влажностью воздуха.

Результатом одного измерения является целое число от 0 до 100 процентов, которое записывается при помощи минимально возможного количества бит. Станция сделала 80 измерений. Определите информационный объем результатов наблюдений.

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

Ребят) Помогите с программой на Паскале, пожалуйстаа)

Нужно написать программу, которая выводит на экран все двухзначные числа, делящиеся на 3 или на 5 (использовать операции целочисленного деления div или mod)

Помогите решить задачки на паскале я совсем не разбираюсь в этом!!! 1)Дана таблица со значениями среднемесячных температур в течение года. Составить

программу на Паскале, в которой вычисляются четыре величины: средние температуры зимних месяцев, весенних месяцев, летних и осенних. 2)Вы посетили магазин и купили 10 видов товара. В таблицу T [1..10] записали количество купленного товара каждого вида. В таблицу C [1..10] записали цену единицы каждого вида товара соответственно. Составить программу на Паскале вычисления общей стоимости всех покупок.

Помогите написать программу для Паскаля.

1. Написать программу нахождения произведения n чисел.

Помогите написать программу на Паскале. Найти

a_{n} и S арифметической прогрессии через цикл for.

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

Создать файл а4, состоящий из 28 целых чисел. Найти среднее арифметическое всех чисел.



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