Домашняя работа на 25 -26 ноября

9 в

1- доделать вопросы теста, если надо прислать ваш вариант, то пишите 54dz.10@gmail.com. ТЕСТ ПО ЗАДАЧАМ, А НЕ ТЕОРИИ

9в, 9г, 9б 

2- практическая 3 задачи: Выучить 2 задачи , 3 решать на уроке

 Задача 1(3 балла). 

Дана строка. Написать программу, определяющую, сколько раз в строке встречается буква «а» маленькая, русская.
Для решения задачи достаточно просмотреть каждый символ строки и сравнить его с буквой «а». При наличии совпадения необходимо увеличить на единицу счетчик количества букв «а». 
var s:string; 
       i,k:integer; 
begin 
   read(s); 
   k:=0;
for i:= 1 to length(s)  do if s[i]='а' then k:=k+1; 
write(k); 
end.

Задача 2. (3 балла). Дана строка. Написать программу, заменяющую в строке все буквы «а» на буквы «о».Var s:string;

i:integer; 
begin
 read(s);
  for i:=1 to length(s) do if s[i]='а' then s[i]:='о' ;    
  write(s); 
      end.

4-балла .Условие получите на уроке