Program pr_1;
var
x,y,sum, umn: integer;
begin
write ('x=');
readln (x);
write ('y=');
readln (y);
sum:=x+y;
umn:=x*y;
writeln ('sum=',sum);
writeln ('umn=',umn);
readln;
end.

Результаты работы внеси в таблицу для заданных x и y.

x
y
sum
umn
43
38

1. Web-страницы имеют расширение:

а) *.htm

2. Для подключения к сети надо иметь

г) сетевую карту

3. Как записывается адрес Web-страницы?

а) www.zp.ua

4. Гипертекст - это

а) структурированный текст, в котором могут осуществляться переходы по выделенным ссылкам

5. Какой используется гипертекстовый язык для создания Web-сайтов?

а) HTML

6. Средство просмотра Web-документов браузер отображает документ на экране, руководствуясь командами, которые автор документа внедрил в текст. Такие команды называются:

а) Тег

7. Укажите, что означает Web-навигация:

б) Целенаправленное перемещение между документами в Web-пространстве.

9. Отметьте правильные IP-адреса

б) 125.34.12.1

г) 11.0.0.0

д) 157.255.45.7

10. Какая из служб сети Интернет позволяет взаимодействовать с удаленным пользователем в реальном времени?

в) электронная почта

д) чат

11. Веб 2.0-сервисы Интернета - это

б) форма коллективного взаимодействия

// PascalABC.NET 3.2, сборка 1437 от 03.05.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString;
  if s<>s.MatchValue('[01]+') then Write('не ');
  Writeln('двоичное число')
end.

Пример
010101111011
двоичное число

begin
  var s:=ReadlnString;
  if s<>s.MatchValue('[\+-]?\d+.\d+') then Write('не ');
  Writeln('дробное число')
end.

Пример
12.54
дробное число

begin
  var s:=ReadlnString;
  s.Matches('\s([\+-]?\d{2})\s').Select(t->Trim(t.Value)).Println;
end.

Пример
123.3 15 -11.7 +21 23.2 51 9 182
15 +21 51