понедельник, 10 ноября 2025 г.

Текстовый редактор

ПРЕЗЕНТАЦИЯ


ПРАКТИЧЕСКАЯ РАБОТА


Задание 1. Запустите текстовый редактор Word.

Ребята, при наборе не делайте красную строку. Мы с вами научимся её задавать позже.

Задание 2. Сохраните пустой документ в файле ввод текста фамилия. Файл сохранить в папке D:\ученики\6А(Б,В,Г).

Задание 3.  Наберите  первый абзац и первое предложение второго абзаца из упр. 1 стр. 69. Сохраните изменения в файле Файл\Сохранить.

Справка.
Запятая «,» -  Shift+.


Задание 4.  Пропустите три пустые строки от предыдущего текста. Для этого нажмите три раза клавишу Enter.  Набирайте только первый и второй абзацы из упр. 2.  Сохраните изменения в файле. 

Справка.
«ў» - там, где «щ» русская. 
 - Shift+1
ё - возле цифры 1


Задание 5. Пропустите три пустые строки от предыдущего текста.  Наберите английский текст из упр. 3.
Сохраните изменения в файле.

Оператор ветвления

ПРЕЗЕНТАЦИЯ К УРОКУ

if  условие then
                     begin
              набор команд, которые выполняются если условие верно
                    end
                 else
                  begin
           набор команд, которые выполняются если условие верно
                 end;

НЕПОЛНАЯ ФОРМА

if  условие then
                     begin
              набор команд, которые выполняются если условие верно
                    end;
               

Если после then или else стоит только одна команда, то операторные скобки begin и end не обязательны.


Порядок выполнения оператора If

1. Вычисляется значение условия.
2. Если условие истинно, выполняются команды, следующим за словом then.
Если условие ложно, выполняются команды, следующим за словом else.
3. Управление передается командам, следующим за условным оператором.

ВНИМАНИЕ! Перед else точка с запятой не ставится.

СОСТАВЛЕНИЕ ПРОГРАММ

Задание 1. Запустите PascalAbcNet


Задание 2. Набрать и выполнить программу из классной работы.

Задание 3.  Компьютер спрашивает, сколько  времени вы сидите в телефоне?  Если меньше  30 минут, то на экране появляется надпись «Хорошо!», иначе «Уменьшай время!». 

Задание 4. Вводится число. Надо определить, является ли оно трёхзначным.

Пример ввода- вывода:

Ввод

119

Вывод

трёхзначное


Ввод

10

Вывод

нетрёхзначное


Ввод

5000

Вывод

нетрёхзначное


Задание 5. В магазине вам надо заплатить N рублей. Вы подаете продавцу m купюр по k рублей. Определите сколько денег вам надо добавить или сколько Ввм должны дать сдачи, или возможно вы дали нужную сумму денег.

var  k,m,n:...;

begin

  writeln('Введите сумму покупки');

  readln(n);

  writeln('Сколько купюр дал человек'); 

  ...

end.

ИГРАЕМ

Удаление части строки

 

ПРЕЗЕНТАЦИЯ К УРОКУ

 Задача. Дана строка: логин:пароль@адрес_сервера. В целях обеспечения безопасности из строки решили удалить пароль и символ :.


Пример

Входная строка: CoolUser:parol@ftp.erunda.ru

Вывод: CoolUser@ftp.erunda.ru




РЕШЕНИЕ ЗАДАЧ

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



Задание 3. Из строки   ФИО^Средний балл&Суммарный балл удалить часть ^Средний балл


Пример

Входная строка: ИвановИ.И.^8,9&27

Вывод: ИвановИ.И&27



Задание 4.  Вводится предложение. Вывести третье слово предложения. Слова отделяются друг от друга пробелами. В предложении три слова.


Идея: удаляем первое слово, затем «новое» первое слово и затем выделяем третье слово.

Задание 5. FTP-Connection. Пользователю, зарегистрированному на FTP-сервере, для получения доступа к файлам на нем нужно набрать в FTP-браузере команду вида: ftp://логин:пароль@адрес_сервера. Написать программу, которая из введенной строки выделяет логин, пароль и адрес FTP-сервера и выводит эту информацию.


Пример

Входная строка: ftp://CoolUser:parol@ftp.erunda.ru

Вывод:

Адрес сервера: ftp.erunda.ru

Логин: CoolUser

Пароль: parol

Преобразование элементов массива

 

ПРЕЗЕНТАЦИЯ К УРОКУ


ИГРАЕМ И ПОВТОРЯЕМ


ДЕЙСТВИЯ НАД ЭЛЕМЕНТАМИ МАССИВА. ПОМОЩЬ

var d:array[1..8] of real;

      i:integer;

begin

   writeln(‘Введите диагонали   8 мониторов:’);

   for i:=1 to 8 do readln(d[...]);


   for i:=1 to 8 do d[i]:=d[...]...;


   writeln(‘Диагонали   8 мониторов в сантиметрах:’);

   for i:=1 to 8 do writeln(d[...]);

end.


ПРАКТИЧЕСКАЯ ЧАСТЬ

Задание 1.  Запускаем среду программирования PascalABC.NET. Ярлык вы найдёте на Рабочем столе или в меню Пуск Обратите внимание на чёрные буквы net в правом нижнем углу значка.

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

Задание 3. В массиве хранятся данные о температуре в градусах Цельсия. Составьте программу перевода этих значений в градусы Фаренгейта по формуле: t °F = t °C *1,8 + 32

Задание 4. После 19.00 павильон возле школы решил делать 60% скидки на булочки. В ларьке продаётся 7 видов булочек. Стоимость товара до скидки вводится с клавиатуры. Выведите стоимость товара со скидкой.

Задание 5. Ребята ходили на репетиционное тестирование. Некоторые  получили 100 баллов. Те, кто получил меньше 85, решили больше времени уделить подготовке, и в следующий раз набрали на 15 баллов больше, кто от 85 до 95 увеличили результат на 5, а 100-балльники удержали свои позиции.

Составьте программу, которая запрашивает количество детей, сдававших РТ, их баллы на первом РТ и выводит на экран номер учащегося и его балл на втором РТ.