Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Tixaia
14.11.2021 10:04 •
Українська мова
1. заполнить массив из 10 элементов случайными числами. увеличить каждый его элемент в 2 раза. исходный массив: 0 4 -3 2 -7 0 5 -6 3 1 конечный массив: 0 8 -6 4 -14 0 10 -12 6 2
Показать ответ
Ответ:
Камила070
09.10.2020 15:44
Uses crt;
const n=10;
var a:array [1..n] of integer;
b:array [1..n] of real;
i:integer;
begin clrscr;
for і:=1 to n do readln(a[i]);
for i:=1 to n do b[i]:=2*(a[i]);
for i:=1 to n do write(a[i]:11);
writeln;
for i:=1 to n do write(b[i]:11:1);
end.
Это в Pascal
0,0
(0 оценок)
Популярные вопросы: Українська мова
0Peppa0
30.03.2021 04:55
Выписать слова близькі за значенням: плине білий човник, хвилечка колише. хвилечка гойдає; плине білий човник,вітер ледве дише. ледве вітер повиває....
shlyakhovdaniik
26.06.2020 16:08
Дібрати до слова застебнути дієслова з протилежним значенням...
ariko010
26.06.2020 16:08
Дібрати до слова виносити дієслова з протилежним значенням...
elyavlasova
26.06.2020 16:08
Складіть і запишіть речення, у яких подані фразеологізми виступатимуть у ролі певних членів речення: 1. прометеїв вогонь-підмет 2. крокодилячі сльози-додаток 3. до кінчіків...
alinavn2014
26.06.2020 16:08
Люди, , ! напишите описание памятника ивана франка в одессе (на украинском языке), , ! заранее )...
SuperChelovek
26.05.2022 12:35
Основной источник питания это земля или воздух...
олололо12
14.05.2021 07:06
4 Circle the correct answer. My neighbour s weekEllen is my neighbour. In her family, the childrenand parents don t do a lot of things together onweekdays. They never...
веранастякрас
29.01.2020 06:11
I said that I would do all my English homework this week. My best friend told me that ... My teacher told us that... Yesterday, my mum/dad said that ......
Kate905
09.04.2023 22:37
Масса этилена, полученного из 90 г метана...
gerty1000
14.11.2022 05:17
Вычисли столбиком 37 008 - 12 385 325 - 8 456 17 346: 354 12 210 : 185 8 058 - 125 ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
const n=10;
var a:array [1..n] of integer;
b:array [1..n] of real;
i:integer;
begin clrscr;
for і:=1 to n do readln(a[i]);
for i:=1 to n do b[i]:=2*(a[i]);
for i:=1 to n do write(a[i]:11);
writeln;
for i:=1 to n do write(b[i]:11:1);
end.
Это в Pascal