Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
vikapataeva
22.01.2021 01:22 •
Информатика
Вычислить квадраты n чисел в паскале
Показать ответ
Ответ:
tanyagrandf
08.10.2020 07:43
PascalABC.NET 3.3.5, сборка 1644 от 23.03.2018
Внимание! Если программа не работает, обновите версию!
begin
ReadSeqInteger(ReadInteger('n=')).Select(t->t*t).Println
end.
Пример
n= 6
-30 45 129 18 0 7
900 2025 16641 324 0 49
0,0
(0 оценок)
Популярные вопросы: Информатика
Error69
25.07.2020 19:46
Обязательный атрибут почтового адреса,по- называющийся at :...
maxkov555p0chlb
06.01.2020 10:08
У програмі, написаній мовою програмування Python, використо- вуючи значення текстової змінної s1, отримали s2 (табл. 10.2).Складіть відповідний програмний код. Перевірте, чи одинаковізасоби...
IIIayni
23.09.2021 12:21
У програмі, написаній мовою програмування Python, використо- вуючи значення текстової змінної s1, отримали s2 (табл. 10.2).Складіть відповідний програмний код. Перевірте, чи одинаковізасоби...
cerivcankin
11.01.2021 12:34
Составьте алгоритм решения проблемы. Таймер показывает время только в секундах.Напишите программу, переводящую время в минуты и секунды...
QAZPLM11
01.11.2021 22:45
Найдите значение выражения 450(8)+ 632(8) 99FEC(16) + ADC.CE(16) Число в скобках это n система счисления...
anastasia738393
16.10.2021 21:39
Будь ласка.До ть рішити цю проблему! нада />...
Andrey785
31.08.2021 15:19
Запишите максимальное и минимальное четырехзначные числа : в 2 системе счисления, в 4,6,8 системах счисления. минимальное число не должно состоять только из 0000,что-то другое....
angelshirina20
27.08.2021 12:31
Домашнее задание по теме «Файлы и файловые структуры» 1. Учитель работал в каталоге C:\Задания для урока\7 класс\Тестовые задания. Затем перешел по дереву каталогов на уровень...
Anasha12
18.12.2020 04:23
с заданием по информатике Все на картинке...
nurgi12345
16.06.2021 12:40
«Орындайық» Жаңа сабақты бекіту тапсырмалары: А) «Табиғат және адам сұлулығы» тақырыбындағы презентациядан бірнеше слайд көшірмесін алып, жаңа слайд - фильмдер жасау.Ә) MS Word...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Внимание! Если программа не работает, обновите версию!
begin
ReadSeqInteger(ReadInteger('n=')).Select(t->t*t).Println
end.
Пример
n= 6
-30 45 129 18 0 7
900 2025 16641 324 0 49