1. Ответ:3. <em>В условном операторе перед ELSE не должно быть ";".</em>
2. Ответ:4. <em>Просто в программу вбиваешь код и проверяешь :)</em>
3.<em>Предположим у нас есть массив.</em>
If (a[i]<0) and (a[i] mod 6=0) then b[i]:=a[i] , где
<em>i-индекс</em>
<em>a[i],b[i]- элементы массива.</em>
<em><u>Т. е. мы смотрим, выполняется ли условие. Если да, то записываем это число в новый массив.</u></em>
Памятник представляет собой копию клавиатуры из бетона в масштабе 30:1. Состоит из 104 клавиш, сделанных из бетона весом от 100 до 500 кг, расположенных в раскладке QWERTY. Клавиши расположены в углублениях с интервалом 15 см. Общая площадь проекта 16 × 4 м. Поверхность клавиш плоская с рельефными обозначениями алфавита и функциональных символов, размещенных в том же порядке, что и на обычной компьютерной клавиатуре.
В июле 2016 года на клавише End установлена мемориальная доска в честь Евгения Зорина
program shegor2003;
var a:array[1..10] of integer;
i, temp:integer;
begin
for i:= 1 to 10 do
a[i]:=random(11);
writeln('Исходный массив:');
for i:= 1 to 10 do
write(a[i]:3, ' ');
writeln;
temp:=a[1];
a[1]:=a[10];
a[10]:=temp;
writeln('Преобразованный массив:');
for i:= 1 to 10 do
write(a[i]:3, ' ');
end.