1.Локальные переменные – это
а) Переменные написанные строчными буквами;
б) Переменные написанные заглавными буквами;
в) Переменные описанные внутри подпрограммы;
г) Переменные имеющие LOCAL
2.Что такое подпрограмма
а) Это часть программы, оформленная в виде отдельной конструкции и снабженная именем
б) Любая часть программы
в) Верхняя часть программы
г) Часть программы от начала до слова BEGIN
3.Где описываются программы
а) В любом месте программы
б) В начале программы до оператора BEGIN
в) В конце программы
г) После оператора BEGIN
4.В чем отличие процедуры от функции при описании
а) У функции должен обязательно быть указан ее тип
б) У процедуры должен обязательно быть указан ее тип
в) Работа с разными типами переменных
г) Отличий нет
5.При описании процедуры ей соответствует оператор…
а) PROCEDURE
б) PROCEDURA
в) PROCEDYRE
г) PROSCEDURE
//PascalABC v3.1
var s: string;
procedure repAll(var s: string; wOld, wNew: string);
var res: string;
p, len: integer;
begin
len:= Length(wOld);
res:= '';
while Length(s) > 0 do begin
p:= Pos(wOld, s);
if p = 0 then begin res:= res + s; break; end;
if p > 1 then res:= res + Copy(s,1,p-1);
res:= res + wNew;
if p+len > Length(s) then
s:= ''
else s:= Copy(s,p+len,Length(s));
end;
s:= res
end;
begin
readln(s);
repAll(s, 'СО', 'ТУ');
writeln(s)
end.
Тестовое решение:
СОК СОК СОК КОК ПОК
ТУК ТУК ТУК КОК ПОК