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

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

Ответ:

nadezdaakopan

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 оценок)

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

meli12341

30.12.2021 17:41

Логические выражения: a& ¬bvb& cv¬a& ¬b...

znayka001

21.01.2020 14:38

Написать программу на языке паскаля. напишите программу, определяющую, лежит ли точка а (ха, уа) на окружности х2+у2=r2, на ней или под ней....

Максоон20022

21.10.2020 11:37

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

зарема89

17.01.2021 19:47

Какая формула будет получена при копировании в ячейку Е4, формулы из ячейки E2 Изображение:...

Artobotik

11.07.2022 23:43

Какие черты свойственны сангвиннику?...

AnyaFOX9

11.07.2022 23:43

Надпись означает иисус назореец царь иудей надпись находилась над головой (выше головы)...

Pots150204

11.07.2022 23:43

2ц крупы в 4 одинаковых мешках.сколько килограммов крупы было в одном мешке?...

Zhuravl220

11.07.2022 23:43

Какие пластиды накапливают запасной крахмал? 1)лейкопласты 2)хромопласты 3)хлоропласты 4)все перечисленные...

Arthas1212523

11.07.2022 23:43

Язык лексико грамматический практикум стр. 40 . 22,23,24...

Chopykoe

11.07.2022 23:43

Сочинение рассуждение на тему можно ли прожить без ошибок?...

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

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