Предмет: Информатика, автор: JayG

сформулируйте массив содержащий 15 элементов, с помощью датчика случайных чисел. получите новый массив, каждый элемент которого равен квадрату соответствующего элемента исходного массива. в полученном массиве определите насколько максимальный элемент исходного массива отличается от минимального элемента нового массива. выведите на экран исходные и полученные результаты

Ответы

Автор ответа: MrsSima
0

Program n1;
Uses CRT;
Const n=15;
Var a:array[1..n] of integer;
b:array[1..n] of integer;
i,min,max: integer;
begin
For i:=1 to n do
begin
a[i]:=random(100);
write(a[i]:3);
end;
writeln;
For i:=1 to n do
begin
b[i]:=sqr(a[i]);
write(b[i]:5);
end;
min:=b[1]; max:=a[1];
For i:=1 to n do
begin
if a[i]>max then max:=a[i];
if b[i]<min then min:=b[i];
end;
Writeln('Raznica ravna ',abs(max-min));
readln
end.

Похожие вопросы
Предмет: Литература, автор: anime6660
1. Прочитай текст и выполни задания.

Первая рыбка

Юра жил в большой дружной семье. Все в этой семье работали. Только один Юра не работал. Ему всего пять лет было.

Один раз поехалаЮрина семья рыбу ловить и уху варить. Много рыбы поймали и всю бабушке отдали. Юра тоже одну рыбку поймал, ерша. И тоже бабушке отдал для ухи.

Сварила бабушка уху. Вся семья на берегу вокруг котелка уселась и давай уху нахваливать:

- Оттого наша уха вкусна, что Юра большушего ерша поймал.

-Потому наша уха жирна и навариста, что ершище жирней сома.

А Юра хоть и маленький был, а понимал, что взрослые шутят. Но всё равно радовался, что в большой семейной ухе была и его маленькая рыбка.


1.2 Запишите ответы на вопросы. /2/

А) Какую рыбку поймал Юра? _________________________________________________



Б) Что сделал Юра со своей первой рыбкой __________________________________________________________________________________________



__________________________________________________________________________________________

Помогите пожалуйста срочно ​