Статистика
Всего в нашей базе более 4 327 657 вопросов и 6 445 963 ответов!

составьте программу,которая формирует массив из 10 случайных чисел,принадлежащих промежутку [-9;9] , и выводит эти числа в столбец.

10-11 класс

Nastja2012 03 окт. 2015 г., 4:06:31 (8 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
тоната
03 окт. 2015 г., 6:58:11 (8 лет назад)

Program zz;
var a:array[1..10] of integer;     
i:integer;
begin 
for i:=1 to 10 do 
a[i]:=random(19)-9; 
for i:=1 to 10 do 
writeln(a[i]);
end.

+ 0 -
Olkakotya
03 окт. 2015 г., 8:03:57 (8 лет назад)

const
  n = 10;

var
  x: array[1..n] of integer;
  i: integer;

begin
  Randomize;
  Writeln('Элементы массива:');
  for i := 1 to n do
  begin
    x[i] := Random(19) - 9;
    Writeln(x[i])
  end
end.

Тестовое решение:

Элементы массива:
-9
0
-3
4
3
9
-7
9
6
-6



+ 0 -
Gdax23
03 окт. 2015 г., 10:45:56 (8 лет назад)

очень срочно)пожалуйста)

+ 0 -
Dantedemon
03 окт. 2015 г., 12:02:37 (8 лет назад)

в паскале?

+ 0 -
Dimanabiev201
03 окт. 2015 г., 13:55:15 (8 лет назад)

да

Ответить

Другие вопросы из категории

В фотоаппарате Кукушка установлена 4- мегапиксельная матрица. В настройка фотоаппарата выбраны: количество цветов 2^16. коэффициен сжатия 0,5.

Сколько фотографий можно буду разместить на карте памяти емкостью 10^9 байт.

Как применить random вместо readln?

program pr9;
type mas= array[-10..10] of integer;
const n = 5;var s,i:integer;a:mas;
begin
writeln('Номера четных отрицательных элементов:');
s:=0;
for i:=1 to n do begin
readln(a[i]);
end;
for i:=1 to n do begin
if (a[i]<0)and(a[i] mod 2=0)then
begin
write(i,' ');
s:=s+a[i];
end;
end;
writeln;
writeln('Их сумма=',s);
end.

Читайте также

Напишите прог-у на паскале... ПЛИИИИИИИИИИЗ 1)даны действительные числа a1, b1, c1, a2, b2, c2. Составьте программу, которая находит координаты точки

пересечения прямых, описываемых уравнениями a1x+b1x=c1 и a2x+b2x=c2. Если прямые пересекаются или не существуют-выдать соответствующее сообщение. 2) даны действительные числа a1, b1, a2, b2. Составьте программу, которая определяет, какая из точек A(a1;b1) или B(a2;b2) лежит на прямой у=2х+1. Если такой точки нет-вывести соответсвующее сообщение.



Вы находитесь на странице вопроса "составьте программу,которая формирует массив из 10 случайных чисел,принадлежащих промежутку [-9;9] , и выводит эти числа в столбец.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.