Паскаль:
10-11 класс
|
Дан массив "А" состоящий из 10 случайных чисел, сформировать новый массив "В", значения которого будут в 5 раз меньше значения массива "А"
var
A: array [1..10] of real;
B: array [1..10] of real;
i: integer;
begin
writeln('Массив А:');
for i:= 1 to 10 do
begin
A[i]:= random(200) - 100; {Задаем каждый элемент массива А случайным числом на отрезке [-100; 100]}
writeln(A[i]);
end;
writeln('Массив В:');
for i:= 1 to 10 do
begin
B[i]:= A[i] / 5;
writeln(B[i]);
end;
end.
Другие вопросы из категории
ниже(данные,введённые пользователем выделены полужирным шрифтом).
Исходные данные:
Длина(см):9
Ширина(см):7.5
задаваемой системой уравнений c условиями:
W=sqrt(at^2+bsint+1) ,при t<0,1
W=at+b при, t=0,1
W=sqrt(at^2+b*cost+1) ,при t>0,1
t[-1;1]
шаг табуляции : i=0,2 (изменение t)
a=2,5
b=0,4
Я могу решить на Pascal,но на С не могу
Помогите очень ваш прошу!!!
Заранее cпасибо!!!
При необходимости могу составить вам блок схему алгоритма . (cообщите в комментарие)
на третьей сверху полке. Какое количество информации библиотекарь передал Пете?
Читайте также
2.написать программу в паскале
f(x)=2(sin*sin)x+1
constructor и destructor и для чего нужна?
4) Что такое implementation и для чего нужна?
5) Назовите модули Паскаль ( в строке Uses, например crt) и какие возможности этот модуль дает?
6) Что за тип переменной: указательный (Pointer)
7) И на последок: что означает символ @ , #, $ , ^
б)y=x^15
Постараться использовать минимальное количество дополнительных переменных.
4. Запишите на языке Паскаль программу циклического обмена значениями трёх переменных a,b,c. Схема циклического обмена: a ← b ← c. Например, если до обмена было: a=1, b=2, c=3, то после обмена должно стать: a=2, b=3, c=1.
Вот код Паскаль:
var
f:array[1..500] of record
fam:string;
bal:boolean;
end;
buf:boolean;
str:string;