<span>Человек лучше понимает и запоминает ту информацию, которая представлена наглядно — с помощью рисунков, фотографий, схем, диаграмм.</span>И дети, и взрослые любят иллюстрированные книги, потому что рисунки позволяют очень быстро понять, о чём идет речь. Так, чтобы понять, о чем написано в выделенном ниже фрагменте текста, вам потребуется приблизительно полминуты; чтобы воспринять смысл рисунка, будет достаточно нескольких секунд. Проверьте.<span>В современных супермаркетах каждый товар имеет на упаковке штрих код — метку, состоящую из чёрных линии. Для чтения штрих-кодов применяют специальные штрих-сканеры. С их помощью в компьютер вводят данные о стоимости покупки.
</span><span>
Для того чтобы показать, как устроены окружающие нас объекты (предметы, процессы, явления) и как они связаны друг с другом, используют схемы.</span><span>Каждый ученик 5 класса знает схематичное изображение приставки, корня, суффикса и окончания слова. Поэтому вы сразу поймёте, о чём идёт речь, если учитель русского языка попросит подобрать слова, соответствующие следующей схеме:</span><span>Для наглядного представления разных числовых данных используют диаграммы.</span>
Const n =5;
var
a:array[1..n] of integer;
i,max:integer;
begin
writeln('Введите 1 элемент массива');
readln(a[1]); max:=a[1];
for i:=2 to n do begin
writeln('Введите ', i,' элемент массива');
readln(a[i]);
if a[i]>max then max := a[i];
end;
writeln('Максимальный элемент массива равен ',max);
end.
Тестовое решение:
Введите 1 элемент массива
21
Введите 2 элемент массива
56
Введите 3 элемент массива
12
Введите 4 элемент массива
24
Введите 5 элемент массива
15
Максимальный элемент массива равен 56
4. c=90
5. c=135
6. s=30
делал в Паскале, надёжно
черный маленький квадрат
красный большой круг
каждое слово заменяется более-менее противоположенным
поскольку в описании каждой фигуры 3 слова изменяются 3 признака
Program enot;
const m=15;
var a: array[1..m] of integer;
i, j, k: integer;
begin
for i := 1 to m do
a[i] := random(21)+10;
for i := 1 to m-1 do
for j := 1 to m-i do
if a[j] < a[j+1] then begin
k := a[j];
a[j] := a[j+1];
a[j+1] := k
end;
write ('Отсортированный массив: ');
for i := 1 to m do
write (a[i]:4);
<span>end.</span>