1. Информатика
  2. Найдите сумму всех чисел

Найдите сумму всех чисел от 1 до k кратных 3

4iksa12345ozu4gd 4iksa12345ozu4gd    2   19.09.2019 08:30    0

Ответы
KetZu KetZu  08.10.2020 01:50
Program HelloWorld;var i,s,k:integer;begin    k:=12;    s:=0;    for i:=1 to k do begin    if(i mod 3=0) then s:=s+i;    end;    writeln(s);end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Huran Huran  07.12.2020 19:50
Информатика бжб 7 сынып 2 тоқсан 2020 жыл​...
Nastasia13z Nastasia13z  17.04.2021 12:49
Зробити розширене сортування в стовпцях НУЖН ,КАК ЭТО ДЕЛАТЬ...
bogdankpro bogdankpro  16.06.2019 03:30
Pascal. написать программу: нахождения цифры в числе с максимальным значением. 9й класс....
Masяsя Masяsя  16.06.2019 03:30
Имеется n количество шариков. для каждого шарика известен диаметр. определить количество шариков с диаметром 5 см....
ksenia721 ksenia721  12.03.2019 14:10
Сообщение, записанное буквами из 16-символьного алфавита, содержит 50 символов. какой объём информации оно несёт?...
нияз35 нияз35  21.05.2019 15:40
Решите уравнение с модулем за 7 класс (4х+2у-5)^2+|4х-6у+7|=0...
aynuran1 aynuran1  21.05.2019 15:40
Turn the following sentences into reported speech. 1) i won t be home late, she said to her husband. 2)mother asked me, where did you find the dog yesterday? 3)peter...
makskos4444 makskos4444  21.05.2019 15:40
Заполнить случайным образом массив размерностью n=20, выбрать из последовательности все элементы которые заканчиваются на 0....
olgaolgahelga olgaolgahelga  21.05.2019 15:40
1)в тесте 5 вопросов к каждому вопросу дано 2 варианта ответов,из которых только один вариант верный,найдите вероятность того, что отвечая наугад ,ученик даст хотя бы...
ggggbbb90 ggggbbb90  21.05.2019 15:40
Разберите по челенам предложения и дайте характеристику предожению: ( пишу тебе письмо, дорогой мой друг, с надеждой вскоре получить ответ. )...

Популярные вопросы