tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Заполнить одномерный массив
Заполнить одномерный массив случайными числами вещественного типа и вывести на экран консольного вывода,количество элементов массива являются константной величиной равной 6
mimimi055
2 24.08.2019 06:30
2
Ответы
Almazik20056
02.08.2020 22:25
Const
N = 6;
Var
A:array[1..N] of real;
i:integer;
Begin
For i:= 1 to N do
Begin
A[i]:=random()*100;
Write(A[i]:0:3,' ')
End;
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
v3tpr33
28.10.2019 18:44
вопрос no 10к операционным системам не относятсяmicrosoft windowsapplemacosmicrosoft wordsamsungliniux ...
tchasikova2018
28.10.2019 18:46
Сколько существует чисел, меньших 150(10), для которых выполняется условие: в записях целого числа в четверичной и двенадцатеричной системах счисления в младшем разряде...
pitonpitonov
28.10.2019 18:51
Запишите алфавит 16-й сс ii i _, _, _, _, _, _, _, _, _ i ii...
kety0milka
08.06.2019 18:10
Найти количество букв а в тексте напишите на c++...
asssssw
08.06.2019 18:10
Вопрос 35 обмен информацией - это: вариант 1 выполнение работы; вариант 2 просмотр телепрограммы; вариант 3 наблюдение за поведением рыб в аквариуме; вариант 4 разговор...
hades77
11.11.2020 14:36
Тест на проверку знаний по теме «Архивация данных» ⦁ Архивация – это …A сжатие одного или более файлов с целью экономии памяти и размещения сжатых данных в одном архивном...
katesgo
04.05.2020 06:29
заполните таблицу Проект «Поход в магазин» Сегодня у Динары день рождения. К ней в гости придут друзья. Чтобы угостить гостей, Динаре нужно сходить в 2 магазина возле дома....
stacezoloto
04.05.2020 04:59
Встречено function , а ожидался оператор function F(n: integer): integer; begin if n 1 then F := F(n - 1) + G(n - 1) else F := 2*n; end; function G(n: integer): integer;...
guljanatkabdrasheva
13.07.2020 20:24
Знания об окружающем мире называют a) информацией b) действием c) предметом...
Саша15e
03.10.2019 23:08
Экспериментатор глюк исследовал зависимость силы тока i от напряжения u в цепи, представленной на рис. 1. в начале эксперимента все три выключателя (к1,к2,к3) были разомкнуты....
Популярные вопросы
Найдите сторону квадрата, периметр кторого в два раза меньше периметра...
2
Книги похожие на книги олега бубелы серии совсем не герой...
2
Выпишите качествянные прилагательные умная книга,добрая душа, строгий...
3
Вариант 2 • 1. преобразуйте в многочлен: а) (3а + 4)2; б) (2х - b)2;...
2
Записать как можно больше глаголов на тему дружба....
1
Как найти все углы образованных двумя параллельными прямыми и секущей...
3
Что означает полоски под гласными н-р: ирина , ася , зоя , синий , яма...
1
Привидите дроби к общему знаменателю: а) х/х-5 и 3/5-х; б) х/(х-4)^2...
3
Пять предложений на казахском языке про день презедента...
3
:из предложений 1—з выпишите производный предлог, в котором звуков больше,...
3
N = 6;
Var
A:array[1..N] of real;
i:integer;
Begin
For i:= 1 to N do
Begin
A[i]:=random()*100;
Write(A[i]:0:3,' ')
End;
End.