На рисунке изображены различные гаджеты. В скольких из них есть буква Н

планшет ноутбук вентилятор смартфон

HHHH

-----------------------------

а)домащняя библиотека

в виде таблицы

1.номер

2.название

3.автор

4.полка

б)1.номер

2.слово

3.вопрос

4.род

5.число

6.падеж

в)1.номер

2.имя

3.фамилия

4.отчество

5.телефон

6.адрес

7.дата рождения

8.хобби

  я тут немного отсебятины добавил, что бы программа не слетала если что-то нерпавильное вводиш))

vara: string; b: integer; beginwriteln ('введите строку'); read (a); if (a='город минск')then writeln ('город минск')elsebeginwriteln ('введите "город минск", 1-продолжить, 0-выйти'); read (b); end; while (b = 1) dobeginwriteln ('введіте строку'); read (a); if (a='город минск')then writeln ('город минск')elsebeginwriteln ('введите "город минск", 1-продолжить, 0-выйти'); read (b); end; end;

end.