Ответы на вопрос:
Var i,s: integer; begin s: =0; for i: =1 to 10 do s: =s+i; s: =s*s; writeln('s^2 = ',s); end. результат: s^2 = 3025
Популярно: Информатика
-
Что можно считать алгоритмом? а)инстструкцию по использаванию смартфона?...
vredina3424.08.2021 04:13 -
Заполните режимы функции open(). Режим- Назначение 1 Открытие файла...
ayaulym1020.05.2021 20:17 -
Какие из перечисленных свойств символов и абзацев были изменены...
olechka16219.01.2021 21:43 -
Сопоставьте языки программирования и системы программирования....
KatyaKorytnaya10.02.2020 00:34 -
Для чего нужны ЯП? • Назовите наиболее известные ЯП. • Что такое...
Polinakuzmina3203.02.2021 06:56 -
В Pyton. С клавиатуры вводятся три числа. Поменять местами большее...
михалыч67619.05.2020 22:04 -
25 баллов! Pascal ABC задача с циклом for. Пойманную мышь посадили...
лсоаоа06.03.2022 06:29 -
Напишите программу на паскале для решения следующей задачи . Даны...
katakaty2343105.09.2020 10:26 -
33 ! статья, набранная на компьютере, содержит 48 страниц, на каждой...
gasimovaa4428.06.2020 08:29 -
Напишите отзыв по рассказу платонова волшебное кольцо...
ivanovayo0826.11.2022 17:45