Все 4-буквенные слова, в составе которых могут быть буквы Н, О, Т, К, И, записаны в алфавитном порядке и пронумерованы, начиная с 1
Ниже приведено начало списка.

ИИИК
ИИИН
ИИИО
ИИИТ
ИИКИ

Под каким номером в списке идёт первое слово, которое начинается с буквы О?

нц пока не сверху свободно

закрасить

вправо

кц

 

нц пока сверху свободно

вправо

кц

 

нц пока справа свободно

закрасить

вправо

кц

 

нц пока не справа свободно

закрасить

вниз

кц

 

нц пока справа свободно

вниз

кц

 

нц пока не справа свободно

закрасить

вниз

кц

 

 

15.2 Решение

 

var k, n, a, amax: integer;

begin

amax:=0;

readln(n);

for k:=1 to n do

begin

readln(a);

if (a mod 5 = 0) and (a>amax) then

amax:=a;

end;

writeln(amax);

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;
}