Блог учителям информатики Беларуси, учащимся, учителям, использующих ИКТ. Всем, кто хочет идти в ногу со временем, быть конкурентноспособными на рынке труда
четверг, 22 декабря 2022 г.
Язык программирования Pascal. Переменные. Типы данных. Ввод данных. Урок 16. 7 класс
ИГРАЕМ
ПРЕЗЕНТАЦИЯ К УРОКУ
ЗАКРЕПЛЕНИЕ МАТЕРИАЛА
Пример ввода:
5
Пример вывода:
Периметр квадрата равен 20.
вторник, 20 декабря 2022 г.
понедельник, 19 декабря 2022 г.
четверг, 15 декабря 2022 г.
Урок 1. Язык программирования Паскаль: структура программы, команда вывода данных
ПРЕЗЕНТАЦИЯ К УРОКУ
ЗАКРЕПЛЕНИЕ МАТЕРИАЛА
вторник, 13 декабря 2022 г.
четверг, 8 декабря 2022 г.
Использование алгоритмических конструкций при составлении алгоритмов для исполнителя Робот. Урок 14. 7 класс
ТЕСТ
ПРАКТИЧЕСКАЯ ЧАСТЬ
вторник, 6 декабря 2022 г.
Алгоритмы обработки строковых величин. Повышенный
Задача. Неопытные пользователи делают красную строку пробелами. Каждый ставит своё количество пробелов. Удалите пробелы в начале строки.
СОСТАВЛЯЕМ ПРОГРАММЫ
1. Дана строка, заканчивающаяся точкой. Посчитать, сколько в ней слов.
2. Дана строка, содержащая английский текст. Найти количество слов, начинающихся с буквы b.
3. Дана строка. Посчитать в ней количество вхождений букв r, k, t.
Составление алгоритмов обработки строковых величин. Повышенный
Задача. С клавиатуры вводится пример вида число 1 + число 2= Вывести на экран сам пример и результат вычислений.
ПРАКТИЧЕСКАЯ ЧАСТЬ
Задание 3. С клавиатуры вводится пример вида число 1 * число 2= Вывести на экран сам пример и результат вычислений.
Задание 4. С клавиатуры вводится пример вида число 1 знак операции число 2= Вывести на экран сам пример и результат вычислений. Возможные знаки: +, -, *, /
Задание 5. Вводится строка вида d1+d2+…+dn, где d1, d2, …, dn — числа. Вычислить значение выражения. Знак может быть +, -, *, /
Обобщающее занятие по теме «Алгоритмы обработки строковых величин»
Задача. Заменить в тексте слово «ноябрь» на «декабрь». Слова в тексте отделяются друг от друга пробелами. В конце текста тоже стоит пробел.
var s:string;
ns:integer;
begin
readln(s);
ns:=pos('... ',s);{ищем слово, которое будем заменять}
while ns>0 do {повторяем действия пока в тексте есть это слово}
begin
... {удаляем слово}
...('...',s,...);{вставляем новое слово}
...{ищем снова слово}
end;
writeln(s);
end.