Помагите пжл составить программу на языке паскаль!

35

Помагите пжл составить программу на языке паскаль! Составить программу вычисления суммы: всех натуральных чисел, кратных b и меньше 100

категория: информатика

ответить

в избранное

60

adstree

23 июля 2023

var i, b, sum: integer; begin read (b); sum: =0; for i: =1 to 99 do if i mod b=0 then sum: =sum+i; writeln (sum); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

Смотрите также:

Какие основные функции выполняет система Turbo Pascal (по главному меню)?

Составьте программу, которая спрашивает у ученика: "какую оценку ты получил за контрольную работу?

Моделью какого реального объекта можно назвать электрическую лампочку? 1) окно 2) стакан 3) воздушные шарики 4) солнце?

Составить программу сокращения одномерного числового массива путем удаления а) всех элементов с нулевыми значениями…

С клавиатуры вводится целое число N. Распечатать число 20 в строку N раз через пробел. (использовать цикл спараметром)

Рассмотрите числа в каждом ряду, определите какое число «лишнее» а) 2,3,6,7,11 б) 18,12,3,29,45,28 в) 1,2,3,5,6,7

Вычислить и вывести произведение квадратов чисел натурального ряда от 3 до N

Графическое обозначение структуры ветвление За ранее благодарна. Оченьнадо: *

Последовательность чисел Фибоначчи образуется так: первый и второй члены последовательности равны единице…

27400

14822

Английский язык

14216

Биология

7369

720

Экономика

18829

8304

География

15850

Геометрия

5255

Информатика

11818

23332

15992

Литература

73118

Математика

8152

Обществознание

466

Правоведение

46271

Русский язык

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!

Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!

Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...