1. Информатика
  2. Вывести массив с 25 элементами,

Вывести массив с 25 элементами, заполненный случайными числами в диапазоне от 0 до 100. вывести без пояснений через 2 пробела.

helpstupedgirl helpstupedgirl    2   07.06.2019 09:20    1

Ответы
ZVer00711 ZVer00711  07.07.2020 07:15
Var
  i:integer;
  a:array[1..25]of integer;
begin
for i:=1 to 25 do
   begin
   a[i]:=random(0,100);
   write(a[i],'  ');
   end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
maxmaxibon11 maxmaxibon11  02.06.2019 10:10
1.сколько раз будет выполнен oператop write? var i,j,s: intrger; begin s: =0; for i: =15 to 18 do begin s: s+1; write(i: 4,s: 5); end; end. 2.чему будет равно s после...
danilkudo423 danilkudo423  02.06.2019 10:10
Расшифровать криптограмму: ндеазлм уурроьп югвлббь млуэраю ыаюнёрт шскглте ькоепир...
гуля5182 гуля5182  29.08.2019 04:00
Скласти слово з букв : а р и л в к...
kamakiko11 kamakiko11  14.07.2019 13:10
Программа которая переводит десятичное число в восьмеричное паскаль...
Lizaliza123123 Lizaliza123123  29.04.2020 15:55
Даны натуральные числа a, b, c, d. Найдите среднее арифметическое тех из них, которые кратны 7. Входные данные Во входном потоке в единственной строке через пробел...
KapitanNEMO KapitanNEMO  29.04.2020 15:55
Найдите значение переменной s после исполнения таких операторов: a) s:=0; i:=0 While i 5 Do i:=i+1; s:=s+100 div i b) s:=0; i:=0 While i 1 Do Begin s:=s+100 div i...
kristinacelidze167 kristinacelidze167  05.08.2019 16:30
Ворганізмі людини постійно підтримується температура +36,6 °с. назвіть сукупність процесів, що забезпечує цю сталість: р самооновлення с саморегуляція т самовідтворення...
ichmaelz ichmaelz  05.08.2019 16:30
ответить 1.когда достигла расцвета: империя карла великого; византийская империя при юстиниане; арабский халифат при харуне ар-рашиде. 2.какую территорию занимала:...
ufs09225 ufs09225  05.08.2019 16:30
Скакими из веществ koh,nace будет взаимиодействовать оксид кальция...
любимая24 любимая24  05.08.2019 16:30
4. замените модальные глаголы соответствующими эквивалентами: 1) he couldn’t explain anything. 2) you may take a short break now. 3) i must leave at once. 4) she...

Популярные вопросы