1) a:array[1..7] of integer = (25, 24, 10, 60, 4, 100, -11)
или (если без значений)
a:array[1..7] of integer
2) a[5] = 4
3) a[a[5]] = a[4] = 60
<span>Writeln(B); - команда вывода, затем новая строка
</span>Write(B); - команда вывода
Компьютер из железа
человек чувствует
iPhone из алюминия
=========
вода сухая
компьютер живой
экран это устройство ввода
Не пойман - не вор. Баба с возу, кобыле легче.
Ответ в) письмо это источник информации