12. Используя только операции выделения подстроки и «сложе- ния» строк, постройте из строки
s:='информатика!
как можно больше слов русского языка. Постарайтесь ис-
пользовать наименьшее возможное число операций. Проверь-
те ваши решения с программы. Пример:
форма - s1:=s (3:7] s1:=copy (s, 3, 5)

теперь не плагиат

program pr; var c: integer; beginwriteln('введите число с'); readln(c); writeln('остаток от целочисленного деления числа ',c,' на 10 в квадрате равен ',sqr(c mod 10)); end.

майор - артиллерист капитан - летчик лейтенант - связист старшина - минометчик сержант - сапер ефрейтор - танкист

program chislo;

var n,delit,count,ccount: integer; beginread(n); count: =0; ccount: =0; for delit: =1 to n doif n mod delit = 0 thenbegincount: =count+1; if (delit mod 2 = 0) then ccount: =ccount+1; end; writeln('делителей: ',count); writeln('четных делителей: ',ccount); end.

сетевые устройства

сетевое по

линии связи