Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
detsadraduga10
28.08.2020 12:08 •
Информатика
Напишите программу вывода последовательности чисел: 1 9 25 49 81 121 на паскале через while надо как-то)
Показать ответ
Ответ:
denis20043601
09.10.2020 14:16
var x:integer;
begin
x := 1;
while x<13 do
begin
write(x*x,' ');
x := x + 2;
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
nyrlan13531
20.11.2022 10:26
Творческое заданиепо информатике...
annlazzzkova
19.11.2020 22:47
сколько существует чисел в шестнадцатеричной сс, которые оканчивается на две одинаковые цифры, в записи которых нет нолей и сумма цифр равна 10?...
Silvertrue
30.10.2020 12:35
зх одномерный массив из 6 элементов с номерами от 4 до 9 заполнить случайным образом числами от 1 до 10. все элементы массива,значения которых меньше 5,уменьшить на единицу.вывести...
сашадобро
24.06.2021 09:23
Как разработать компьютерную игру...
iDanee
12.09.2022 15:08
Акакая относительная особенность внешнего интерфейса и преимущества интерфейса ? заранее )...
Pifpafff
21.08.2022 15:06
Постройте дерево каталогов C:\Рисунки\Природа\Небо.bmp C:\Рисунки\Природа\Снег.bmp C:\Рисунки\Компьютер\Монитор.bmp C:\Мои документы\Доклад.doc...
Язиля111
17.04.2022 19:14
Я не понимаю что это и как это делается , мне нужна ......
panda4918
31.03.2023 01:57
Складіть програму, яка буде рахувати кількість введених з клавіатури речень...
Настя2017465
11.04.2022 09:30
ДОМАШНЕЕ ЗАДАНИЕ в Найдите термин в соответствии с описанием:а) в программе Scratch графически движущийся объект – этоб) блоки команд Scratch отсортированы по цвету. Их...
Мадам44444444
06.07.2022 04:52
буду очень благодарен. Заранее...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var x:integer;
begin
x := 1;
while x<13 do
begin
write(x*x,' ');
x := x + 2;
end;
end.