Сос, паскаль
Нужно через процедуру вывести массив, состоящий из двузначных четных чисел. Почему-то при вводе n=3, выводит только 2 элемента массива.
Type Mass=array [1..100] of integer;
var b:Mass;
n:integer;
procedure заполнение(n:integer);
var i:integer;
begin
for i := 1 to n do
b[i] := random(100);
for i := 1 to n do begin
if (b[i] mod 2 = 0) and (b[i]>=10) and (b[i]<=100) then
write(b[i] );
end;
end;
begin
writeln('Ввод');
read(n);
заполнение(n);
end.

Pascal: 
var
    n    : integer;
begin
    if n >= 100 then 
        write('Да, трехзначное');
    else 
        write('Нет, не трехзначное');
    readln; readln;  // для паузы
end.

p.s. За синтаксические ошибки не отвечаю


C++:

#include <iostream>

int main() {
    //Если нужен русский язык на выводе написать здесь: setlocale(LC_ALL, "rus");
    int n;
    cin >> n;
    if (n>=100) {
        cout << "Yes";
    } else {
        cout << "No";
    }
    system("pause"); // Для паузы
    return 0;
}

Рабочий стол:

— значки и ярлыки объектов Windows

— окна открытых приложений

— панель задач, содержащая кнопку «Пуск», панель индикации и ряд панелей инструментов Рабочего стола

— подложка Рабочего стола, содержащая однородный фон, фоновый рисунок или активные элементы рабочего стола.

По ходу работы на Рабочем столе могут быть дополнительные объекты: окна папок, диалоговые окна, окна приложений и т. д.

После входа пользователя в систему на экране появляется Рабочий стол, оформление которого зависит от выбранной темы. Тема определяет фоновый рисунок, набор звуков, значков и других элементов Рабочего стола. Выбрать фоновый рисунок, набор звуков и значков Рабочего стола позволяет диалоговое окно Свойства: Экран.

Изготовление шевронов