<span>Шрифт
Размер шрифта
Полужирный
Курсив
Подчеркнутый
___
Выровнять:
</span>По левому краю
<span>По центру
По правому краю
__
</span>Нумерация
Путь к файлу (Например C:\file.txt)
1 задача. Начальный путь С:\Соревнования\Команда.
Он поднялся вверх, попал в каталог Соревнования, а в нем есть каталоги Команда и Секции.
Он опустился в каталог Секции, а потом в подкаталог Баскетбол.
2 задача.
а) Ввести число 2500
Нажать кнопку * (умножение)
Ввести число 12
Нажать кнопку %.
Ответ: 300
б) Ввести число 3400
Нажать кнопку *
Ввести число 12
Нажать кнопку %
Ответ: 408
в) Ввести число 15100
Нажать кнопку *
Ввести число 12
Нажать кнопку %
Ответ: 1812.
Использовать Робот
алг
нач
нц 2 раз
нц 4 раз
закрасить
вниз
кц
нц 6 раз
закрасить
вправо
кц
нц 4 раз
закрасить
вверх
закрасить
кц
нц 4 раз
влево
кц
нц 2 раз
вниз
закрасить
кц
нц 2 раз
вправо
закрасить
кц
вверх
закрасить
нц 4 раз
если справа свободно и снизу свободно то
вправо
вниз
все
кц
кц
кон
Const n=10;
var a:array[1..n] of integer;
k,i:integer;
begin
Randomize;
for i:=1 to n do begin
a[i]:=random(9)+2;
write(a[i],' ');
end;
writeln;
k:=0;
for i:=1 to n do
if a[i] mod 2 = 0 then k:=k+1;
writeln('Четных: ',k,' нечётных: ',n-k);
end.
Пример:
<span>2 2 4 7 9 10 9 4 5 4
Четных: 6 нечётных: 4</span>