Ответ.
Меню
Задать вопрос!
Вход
Регистрация
Задать вопрос!
Меню
Все категории
Фотография и видеосъемка
Знания
Другое
Гороскопы, магия, гадания
Общество и политика
Образование
Путешествия и туризм
Искусство и культура
Города и страны
Строительство и ремонт
Работа и карьера
Спорт
Стиль и красота
Юридическая консультация
Компьютеры и интернет
Товары и услуги
Темы для взрослых
Семья и дом
Животные и растения
Еда и кулинария
Здоровье и медицина
Авто и мото
Бизнес и финансы
Философия, непознанное
Досуг и развлечения
Знакомства, любовь, отношения
Наука и техника
varvar32
3 года назад
5
Составьте программу которая формирует массив из 13 случайных чисел, от 0 до 30, меняет местами 4-й и 9-й элементы и выводит знач
ения элементов массива на экран до и после обмена.
Pascal ABC
Знания
Информатика
Ответить
Комментировать
Отправить
1
ответ:
алисина
[7]
3 года назад
0
0
Const n=13;
var a:array[1..n] of integer;
i,c:integer;
begin
Randomize;
writeln('Массив A:');
for i:=1 to n do
begin
a[i]:=random(31);
write(a[i]:4);
end;
writeln;
c:=a[4]; a[4]:=a[9]; a[9]:=c;
for i:=1 to n do write(a[i]:4);
writeln;
end.
Пример:
<span>Массив A:
11 25 20 0 7 28 27 26 23 25 12 24 20
11 25 20 23 7 28 27 26 0 25 12 24 20</span>
Отправить
Читайте также
Оцените информационный объем стереоаудиофайла длительностью 10 секунд при глубине кодирования 8 битов и частоте дискретизации зв
АнастасияЛисенкова
8000х10х3х2х=480000
8=2(3)
стерео = 2 дорожки
0
0
4 года назад
Какое, по вашему мнению, чувство (зрение, слух, обоняние, осознание) является наиболее развитым у орла, волка, летучей мыши, дел
Агафонова [14]
Орел - зрение.
Волк - обоняние
Летучая мышь - зрение.
Дельфин - слух
Крот - слух
0
0
4 года назад
1Что такое байт,килобайт,мегабайт и гигабайт?2Сколько битов составляет 1/2 килобайта?3Сколько школьных учебников емкостью 350 Лб
havrja
1) Все это единицы измерения информации.
0
0
4 года назад
Пользователь хочет поработать с картинкой разрешением 800х600, используя одновремено 65536 цветов (16-битное кодирование). Видео
NikonIN [1]
800*600*16бит=800*600*2байта=960000
0
0
1 год назад
Помогите пожалуйста! Дам 10 баллов!
anton2048 [7]
Для запуска программы Shift F9.
0
0
3 года назад
Смотрите также:
Какие пункты не являющиеся системами программирования : 1)ЛИПСА; 2) ЛИСП; 3) ФОРТРАН; 4)БЕЙСИК
11
·
1 ответ
Двоичная запись чисел по порядку 0.1.10.11.100.101.110.111 напишите следующие 3 числа в двоичной записи
6
·
2 ответа
5 Петя записал IP-адрес школьного сервера на листке бумаги и положил его в карман куртки. Петина мама случайно постирала куртку
11
·
1 ответ
Через 1 трубу -? Через вторую -20 часов 1+2=6 часов
6
·
1 ответ
Как действуют поисковые системы
5
·
1 ответ
Как вы понимаете слова "изображение выполнено с разрешением 640*480"?
5
·
2 ответа
Сколько Кбайт информации содержит сообщение объёмом 220 бит? В ответе укажите одно число.
14
·
1 ответ
Помогите, прошу! Информатика. Выполнить вычисления по блок-схеме
9
·
1 ответ
Написать программу по вычислению y при y =Kx+b при известных целых k и b срочно пожалуйста!!!!!!! В Паскале
11
·
1 ответ
Приведите примеры - 5 использования компьютера
6
·
1 ответ
×
Добавить ответ
Отправить
×
Вход
E-mail
Пароль
Запомнить меня
Войти
Не зарегистрированы?
Пройти быструю регистрацию
×
Регистрация
Ваше имя
E-mail
Пароль
Зарегистрироваться
close
Вход
Регистрация
Задать вопрос!