Вход
Регистрация
Спроси здесь
Все
Биология
Информатика
Видео-ответы
Физика
Французский язык
Русский язык
Қазақ тiлi
История
Окружающий мир
География
Обществознание
Алгебра
Психология
МХК
Другие предметы
Английский язык
Українська література
Право
ОБЖ
Немецкий язык
Українська мова
Беларуская мова
Музыка
Химия
Экономика
Геометрия
Литература
Показать все предметы
Показать меньше предметов
egortupi
21.08.2019 05:30 •
Информатика
Создать массив,каждый элемент которого равен квадрату своего номера.
Показать ответ
Ответ:
ШерлокХолмс11111
05.10.2020 08:49
Program n1;
const n=10;
var a: array [1..n] of integer;
i: integer;
begin
for i:=1 to n do a[i]:=i*i;
for i:=1 to n do writeln(a[i]);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
alina1abikeeva
25.09.2019 17:40
Определите что будет напечатанно в результате выполнения следущего алгоритма, записанного на паскале : var s: integer; k: real ; begin s: =377 ; if s mod 10 =7 then begin s : =s+3;...
kotovaann2016
25.09.2019 17:40
15 ! определите значение целочисленных переменных a и b после выполнения программы: a: =6+3*8; b: =(a div 10)+9; a: =(b mod 10)+4;...
Mamaluska
25.09.2019 17:40
Написать программу на языке python: 1. в квадратной комнате шириной a и высотой b есть окно и дверь с размерами c на d и m на n соответственно. вычислите площадь стен для оклеивания...
Boss2009
21.05.2019 18:50
Кто-нибудь кто хорошо разбирается в pascal 1.нарисовать круг, разделённый на n одинаковых частей, окрашенных в разный цвет. количество частей n вводится с клавиатуры. 2.нарисовать...
nononono3j
27.10.2020 09:26
По рисунку 4 соотнесите характеристики по поколениям. А. 1-B, 2-C, 3-E, 4-A, 5-DB. 1-D, 2-A, 3-C, 4-E, 5-BС. 1-B, 2-A, 3-C, 4-E, 5-D...
Mikich2
27.10.2020 09:26
Какое значение будет выведено на экран в результате выполнения программы? var i,k: integer; a: array[1..10] of integer; begin k:=1; for i:=1 to 10 do a[i]:=i; for i:=1 to 10 do if...
ndehost
07.05.2020 07:24
Определи истинность составного высказывания. A = «Монитор – устройство вывода информации». B = «Процессор – устройство хранения информации». C = «Сканер – устройство ввода информации»....
Vikak005love
07.05.2020 07:24
Program summer;.var a, b: integer;begina := 20;b:= 3;b:= a/2*b;TEa := 2*a + 3*b;write (a);end. Решите...
burgerface
07.05.2020 07:25
2 сор по информатике 6 класс 4 четверть,кто писал?Скинте с ответами....
HKL11
07.05.2020 07:25
ОЧЕНЬ НАДО определите и объясните результат формулы если А1 меньше 0 отрицательный положительный если А1 = 5, 0, 7 есть ли ошибка в результате...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
КОМПАНИЯ
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ и учителей
Сообщество родителей
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
Установи приложение
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь понять?
Спроси здесь
const n=10;
var a: array [1..n] of integer;
i: integer;
begin
for i:=1 to n do a[i]:=i*i;
for i:=1 to n do writeln(a[i]);
end.