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

Напишите программу определяющую сумму всех чисел от 1 до 100. s: =s+x

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

Ответ:

Milana000000111

07.10.2020 09:17

//Pascal
var S, x: integer;
begin
S := 0;
for x := 1 to 100 do S := S + x;
writeln(S);
end.

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

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

mccoy04

27.05.2023 11:22

Отгадай, какое слово закодировано в да...

MaximVeretennikov

02.06.2021 21:47

На рисунке фрагмент электронной таблицы. в ячейку b2 записали формулу =($a2*10+b$1)^2 и скопировали ее вниз на 2 строчки, в ячейки b3 и b4. какое число появится...

MASKARAD2211

25.10.2022 20:27

Производится двухканальная (стерео) звукозапись с частотой дискретизации 48 кгц и 16-битным разрешением, результаты записываются в файл, сжатие данных не используется....

ЖанЖак2003

04.03.2022 10:26

Какова роль гипертекста на страницах всемирной паутины?...

dashavr1

30.05.2023 01:16

Как рассчитывать зароботную плату в 1 с...

juicedark6

16.02.2023 02:55

Медный диск диаметром d = 10 см вращается с частотой n = 7200 1 / мин в однородном магнитном поле с индукцией В = 0,1 Тл, перпендикулярном плоскости диска. Определить...

00LenaVaganova11

16.02.2023 02:55

Можете подсказать произведения, где главные герои - журавли?...

adelkasquirrel11

16.02.2023 02:55

Верно или неверно? England is famous for its tea traditions, beer and kilts....

artiushkin213

16.02.2023 02:55

Сделать проверку решение 5^3х+4=625 5^3х+4=625 3х=0 х=0...

Дарья16072005

16.02.2023 02:55

Розкажіть про лиричного героя триптиха Т. Шевченко Доля , Муза , Слава ....

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

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