Войти Регистрация Спроси ai-bota

Составить программу, вычисляющую сумму чисел от 1 до 256, кратных 13.

Показать ответ

Ответ:

KAKAKALYYA12

02.07.2020 23:29

Программа на Паскале
program xxx;
var i,s : integer;
begin
s:=0;
for i:=1 to n do
if i mod 13 = 0 then s := s + i;
write('сумма чисел кратных 13 =', s)
end.

0,0(0 оценок)

Популярные вопросы: Информатика

мавштдэкычп

06.01.2023 08:10

Дан целочисленный линейный массив. удалить из него последний четный элемент....

VIDAL17

07.01.2020 21:21

1) 1,5 мб в биты. 2) переведите 16 кб в биты. 3) переведите число 418 из десятичной в восьмеричную. 4) переведите число 110101 из двоичной в десятичную. 5) с какой скоростью...

катя5088

20.12.2022 13:53

(мат.логика) с четвёртым, . и с шагами, ...

liteman1000ow7ldr

06.02.2020 11:30

Как распечатать код программы scratch...

KeKoLolist

31.07.2020 16:34

Втекстовых редакторах используются таблицы при создании текстовых документов, содержащих картинки. делают текстовую информацию легкообозримой при создании текстовых документов...

men1tos

27.10.2020 20:25

Переход между осуществляется с объектов или гиперссылок значка на экране, положение которого изменяется при использовании устройства позиционирования графиков диаграмм...

Андрей1935362825

14.08.2022 20:04

Текст состоит из символов: букв, цифр, знаков препинания. как компьютер их различает? по их изображению коду по их сигналам по их двоичному коду...

margaritrw

11.01.2022 18:04

Расположите по порядку оформление автооглавления...

Lizzka1301

15.09.2021 07:10

КТО разбирается в пк тут 3 вопроса!...

valeriyanikiti

08.06.2020 12:41

блок схемы . Проверить, четное ли число. Если да, то прибавить к нему 1, если нет, то отнять 2. (A mod 2=0)...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку