Автор Елена Иванова задал вопрос в разделе Другие языки и технологии
Информатика (9) класс, массивы и получил лучший ответ
Ответ от ?[гуру]
for i := 1 to 11 do begin a[i]:=random(20--15+1)+15; write(a[i]:4); end; a[5] := a[5] xor a[9]; a[9] := a[9] xor [a5]; a[5] := a[5] xor a[9]; for i := 1 to 11 do write(a[i]:4);
Ответ от Иван Сигаев[гуру]
DIM A(11)
FOR I=0 TO 10
A(I)=INT(RND()*(20-(-15)+1))-15
NEXT I
FOR I=0 TO 10
PRINT A(I);
NEXT I
TEMP=A(5)
A(5)=A(9)
A(9)=TEMP
FOR I=0 TO 10
PRINT A(I);
NEXT I
DIM A(11)
FOR I=0 TO 10
A(I)=INT(RND()*(20-(-15)+1))-15
NEXT I
FOR I=0 TO 10
PRINT A(I);
NEXT I
TEMP=A(5)
A(5)=A(9)
A(9)=TEMP
FOR I=0 TO 10
PRINT A(I);
NEXT I
Ответ от Cublen[гуру]
a[i]:=random(36)-15; вот так
a[i]:=random(36)-15; вот так
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: Информатика (9) класс, массивы
спросили в Randomness
Информатика 9 класс, Паскаль!
1)
program task1;
const n = 9; {кол-во элементов массива}
var a:array[ 1..n] of
подробнее...
Информатика 9 класс, Паскаль!
1)
program task1;
const n = 9; {кол-во элементов массива}
var a:array[ 1..n] of
подробнее...
спросили в Бейсик
у кого есть демо версии егэ по информатике 2008.
Демонстрационный вариант ЕГЭ 2008 г. ИНФОРМАТИКА, 11 класс.
© Федеральная служба по надзору в
подробнее...
у кого есть демо версии егэ по информатике 2008.
Демонстрационный вариант ЕГЭ 2008 г. ИНФОРМАТИКА, 11 класс.
© Федеральная служба по надзору в
подробнее...