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

Составит программу нахождения суммы натуральных чисел от 1-100

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

Ответ:

ЯЛюблюЛето

22.06.2020 21:53

Var
i, sum : integer;
begin
sum := 0;
for i := 1 to 100 do sum := sum + i;
writeln (sum);
end.

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

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

alena0bashinskaya

15.11.2020 11:22

Решите .директор фирмы компэду решил наградить юбиляров, работающих в этой фирмекомплектом компьютерной техники: принтером, мышкой и устройством для храненияинформации. причём...

дззззззззззззззззз

07.02.2021 11:35

Что делать если не показывает статус в ватсапе мой у других и другие у меня ? скажите мне...

SakuraHarunoo

25.07.2022 11:29

Уисполнителя калькулятор две команды 1 прибавить 1 2 прибавить 2 первая из них увеличивает число на экране на 1, вторая на 3.сколько разных чисел можно получить из числа 2 с программы,...

Masha07041

28.11.2021 00:14

Для какого из указанных значений числа x истинно выражение ( 9 x) и ø ( x 2)? 1) 2 2) 4 3) 6 4) 8...

Xtrail

14.09.2020 15:50

Y=0,5+√x2+1-tg2(x2+1), найти среднее арифметическое отрицательных значений функции . исходные данные xmin- 1,5, xmax-2,3,∆x-0,1...

faets

03.06.2022 01:52

Считая,что каждый символ кодируется 16-ю битами,оцените информационный обьем в битах следующей фразы в кодировке unicode : в шести литрах 6000 миллилитров...

Engishmaster

10.10.2021 14:02

Вести 4 трехзначных числа abcd получить 3 четырёхзначных числа в обратной последовательности...

andrievskiyvitaliy

05.03.2020 01:18

В строке заменить все двоеточия (:) точкой с запятой (;) подсчитать количество замен в паскаль...

ПРОКОФИЙ2005

06.02.2021 15:15

Что изображено на картинке...

Pyfkein

06.02.2021 15:15

Що відносяться до даних логічного типу ...

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

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