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

Найдите сумму чисел, кратных 5 от 1 до n(паскаль)

Ответ:

liza1430

05.10.2020 15:02

Var
N,S:integer;
Begin
S:=0;
ReadLn(N);
For N:= 1 to N do
if N mod 5 = 0 then S:=S+N;
WriteLn('S = ',S);
End.

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

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

Ruiche

17.02.2021 06:50

Дан специальный знак языка Паскаль: ; Определи его назначение. указание диапазона комментарий разделяют один оператор от другого заключают в себе индексы элементов...

nodiramahammadz

24.11.2022 10:18

Найти сумму чисел которые делятся на n среди всех трехзначных чисел. (паскаль) ...

katrinzeta18

10.01.2022 21:39

РАСШИФРОВАТЬ СЛОВА 4 КЛАСС...

Nastenka5738

23.05.2023 20:41

Найти произведение чисел на промежутке от 3 до 7(паскаль) ...

searchsignal

20.08.2020 23:52

Вывести на экран все двузначные числа кратные 6(паскаль) ...

MashaEdinorog

25.07.2021 18:23

Дано : v=512 000 ,бит/с t= 60 сек найти : i в кбайтах дано: t=10мин v 32 кбит/сек найти : i в кбайтах заранее...

minickotik

25.07.2021 18:23

Што такое кпк и как етим пользовитса?...

Prokofevs84

25.07.2021 18:23

Сканер, клавиатура, монитор , микрофон. что...

ArtamoshkinaPol

25.07.2021 18:23

Дискета емкостью 1,44 мб заполнена на 2\3. сколько это в...

NeYch999

09.06.2021 05:06

Каждый элемент квадратной матрицы размером nxn равен нулю, либо единице. найдите количество островов , образованных единицами. под островом понимается группа единиц...

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

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