Урок 11-12 ноября подготовка к практической работе 18 и 19 ноября

1  Напишите программу, которая определит количество предложений в тексте. Предложение  заканчивается  символом  «.»

2 Напишите  программу,  которая  определит  количество  слов  в  тексте,  если  между 
любыми  двумя  словами  может  быть  неболее  одного  пробела.  

3Написать программу, определяющую, сколько раз в строке встречается буква «п» маленькая, русская. 
 
4Написать программу, определяющую, сколько раз в строке встречается буква «л» маленькая, русская. 

5 Написать программу, заменяющую в строке все буквы «и» на буквы «ы».

  6Написать программу, определяющую, сколько раз в строке встречается буква «п» маленькая, русская и вывести все индексы буквы  «п».

7 Написать программу, заменяющую в строке все буквы «и» на буквы «ы» и подсчитать количество замен

8 Напишите программу, которая определит, каких букв в строке с русским текстом 
больше: «о» или «O» 

 9 Напишите  программу,  которая  определит,  сколько  слов  в  тексте  начинается  на 
букву «а».

10 Напишите  программу,  которая  заменит  в  заданном  тексте  из  латинских  букв все 
вхождения «f» на «kf»

Шаблон команд

• 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; 
• w rite('а штук' , k); 
•   for i:=1 to length(s) do
•  if s[i]='а' then s[i]:='о' ;   
•   if s[i]='а' then  w rite('индекс буквы а' , i); 
• if s[i]='а' then  begin w rite('индекс буквы а' , i); n := n+1 ;end  ;

 

К уроку 11 и 12 ноября

 Выписать в тетрадь и выучить( если не знали), то что должны знать с 1 четверти. 

var s:string; описание строковой величины

read(s); ввод величины с клавиатуры

s := ' Школа '+ ' '+ 'привет ' ; склейка величины из слов

 length(s) ; подсчет количесва символов в величине

for i:= 1 to length(s) do if s[i]='A'  then ka:=ka+1; подсчет количества букв А в величине

for i:=1 to length(s) do if s[i]='а' then s[i]:='о' ;    замена букв а на о

if s[ length(s)-1]='A'  then writeln ('предпоследняя буква слова А') проверка предпоследней буквы на букву А

План работы на 2 четверть

 План работы 2 четверть

11.11 Подготовка к практической работе, решение задач

18.11 Практическая работа

2 5.11 Тест. Новая тема ирешение задач

02.12  решение задач. Итоговое зания по Pascal

09.12 Новая тема Электронные таблицы

16.12Закрепление темы. Тест по терминам

23.12 Решение задач

УРОК 28-29 ОКТЯБРЯ

 //ФАМ
//Даны строка S и символы А и В. Написать программу, определяющую, какой символ – А или В – встречается чаще
var s:string;
      k ,i,ka,kb:integer;
begin
   read(s);
   ka:=0;
   kb:=0;
for i:= 1 to length(s)
 do if s[i]='A'
  then ka:=ka+1;
 
for i:= 1 to length(s)
 do if s[i]='B'
  then kb:=kb+1;
  if ka> kb THEN write('a,ЧАЩЕ',ka)
            ELSE write('B,ЧАЩЕ',kb);
 
 
end.

Домашняя работа на 28-29 октября. Будет тест

Смотреть видео ссылка

Будет тест параграф 7

В ТЕТРАДЬ ОТВЕТЫ

 Как задается пустая строка ?

Что задает Length(s);

правильное описание величины S строковый тип

 как правильно  присваивать величине s значение

Нумерация символов начинается с ______, s[i] соответствует i-му символу в строке s

Значение строковой величины записывается в ________.

 Какая строка подсчитывает количество пробелов во введенной с клавиатуры строке

Написать условие цикла( счетчик n), в котором заменяются все буквы «н» величины m  на буквы «р» (между командами  один пробел, всего пробелов-3). В конце ;

ДЛЯ ТЕХ КТО УВЕРЕН В СЕБЕ 

ЗАДАЧА 1 СТР 61

урок 14-15 октября

 Пример 5. Дана строка. Написать программу, определяющую, сколько раз в строке встречается буква «а» маленькая, русская.
Для решения задачи достаточно просмотреть каждый символ строки и сравнить его с буквой «а». При наличии совпадения необходимо увеличить на единицу счетчик количества букв «а». 
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.
Пример 6. Дана строка. Написать программу, заменяющую в строке все буквы «а» на буквы «о».
Var s:string;
i:integer; 
begin
 read(s);
  for i:=1 to length(s) do

 if s[i]='а' 

then s[i]:='о' ;    
  write(s); 
      end.

Самостоятельная работаВыполнить следующие задания.

Задачи склейки символов

2. Дана строка длиной более двух символов. Написать программу, выводящую на экран строку, составленную из первого, второго и последнего символов исходной строки.

3. Даны две строки. Написать программу, определяющую длину строки, которая получится после склейки двух исходных строк.

4. Дана строка. Написать программу, определяющую, совпадают ли первый и последний символы строки. Если совпадают, вывести true (ист), иначе вывести false (ложно).

Задачи Поиск символа

5. Даны строка S и символ С. Написать программу, определяющую, сколько раз в строке S встречается символ С.

6. Дана строка, содержащая несколько слов, разделенных одним пробелом. В начале строки и в конце пробелов нет. Написать программу, подсчитывающую количество слов в предложении.

7. Даны строка S и символы А и В. Написать программу, определяющую, какой символ – А или В – встречается чаще.

Задачи замены символа

8. Даны строка S и символы А и В. Написать программу, заменяющую в строке S все символы, равные символу А, на символ В.

9. Даны строка S и символы А и В. Написать программу, заменяющую в строке S все символы, равные символу А, на символ В, а все символы, равные символу В, на символ А.

Задачи на индекс

10. Дана строка. Написать программу, выводящую порядковые номера всех гласных букв строки.

Задачи с функциями

11. Дана строка, содержащая только цифры. Написать программу, определяющую количество чётных цифр во введенной строке.

Задачи с новой строкой

12. Дана строка, содержащая слова. Некоторые из слов взяты в круглые скобки. Написать программу, выводящую исходную строку без скобок.
13 . Дана строка. Написать программу, которая определяет, является ли строка перевертышем, т. е. читается ли она одинаково как слева направо, так и справа налево. Если строка является перевертышем, выведите true (ист), иначе выведите false (ложно). Например ШАЛАШ – перевёртыш.

14. Даны строка S и символ В. Написать программу, которая удваивает каждое вхождение символа В в строку S (каждый символ В заменить на ВВ).

15. Дана строка, содержащая слова, разделенные одним или несколькими пробелами. Написать программу, заменяющую каждый пробел парой символов «!?».

16. Дана строка, состоящая только из цифр. Найти сумму этих цифр.

17. Даны две строки. Вывести символы, встречающиеся и в той, и в другой строках.