Язык программирования Pascal. Переменные. Типы данных. Ввод данных

ИГРАЕМ

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

Задача. Составить программу, которая находит площадь прямоугольника.

var d,s : real;{описание 2-х переменных вещественного типа}

begin

  writeln('Введите длину и ширину прямоугольника');{выводит надпись Введите...}

  readln(d,s);{ждёт пока вы введёте 2 числа, числа вводятся через Enter}

  write('Площадь прямоугольника равна ' , d*s);{выводит надпись Площадь... и результат}

end.

ЗАКРЕПЛЕНИЕ МАТЕРИАЛА

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

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

Задание 3. Составьте программу, которая по стороне квадрата вычисляет его периметр. Выполните программу для разных значений. 

var d : real;{описание переменной вещественного типа, она обозначает длину стороны}

begin

  writeln('Введите длину квадрата');{выводит надпись Введите...}

  readln(ЗДЕСЬ ДОЛЖНА БЫТЬ ПЕРЕМЕННАЯ, КОТОРАЯ ОБОЗНАЧАЕТ ДЛИНУ стороны);{ждёт пока вы введёте 1 число}

  write('Периметр равен ' , ЗДЕСЬ ЗАПИСЫВАЕМ ВЫРАЖЕНИЕМ, КАК СЧИТАТЬ ПЕРИМЕТР );{выводит надпись Периметр... и результат}

end.

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

5

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

Периметр квадрата равен 20.

Покажите результат выполнения учителю.

Использование основных алгоритмических конструкций для решения практических задач

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

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

Задание 2. В лотерее участвуют 100 билетов. Билеты пронумерованы от 1 до 100. Каждый билет, номер которого делится на 7, и является счастливым. Составьте программу, которая выводит номера счастливых билетов и их количество. 

Задание 3. Условия лотереи изменились и теперь счастливым является каждый билет, номер которого делится на 11. Составьте программу, которая выводит номера счастливых билетов и их количество. 

Пишем письмо Деду Морозу

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

2. Создайте новый текстовый документ.

3. Сохраните его в папку D:\ученики\6Г под именем Письмо ваше имя

4. Наберите текст письма. В тексте 4 абзаца. Всемирному Деду Морозу - это один абзац. В конце каждого абзаца вы нажимаете Enter.

5. Выделите фрагменты текста и подберите размер шрифта. Кнопка на подсказке.

6. Выделите фрагменты текста и подберите шрифт.

7.  Выделите фрагменты текста и подберите начертание.

8. Выделите фрагменты текста и подберите цвет.

9.  Выделите своё имя и установите выравнивание по правому краю.

10. Выделите текст «Письмо...» и установите выравнивание по центру.

11. Выделите текст «Здравствуй,...» и установите выравнивание по ширине.

Работа с таблицами базы данных. Создание таблиц базы данных. Ввод и редактирование данных

ИГРАЕМ 

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

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

Задание 1. Запустите Microsoft Access и создайте новую базу данных. Сохраните файл в папку D:\ученики\10А, Б Имя файла Новый год фамилия.

Задание 2-3. На основании информации  ниже создайте таблицу Деды Морозы. Перед выполнением задания прочитайте, пожалуйста, вопросы ниже.

1. Зюзя (Беларусь). Место жительства - лес. Приносит подарки 31 декабря.
2. Дед Мороз (Россия). Место жительства - Великий Устюг. Помощница Снегурочка. Приносит подарки 31 декабря.
3. Кыш-Бабай (Татарстан). Место жительства -  лесу.  Помогает дочка Кар Кызы. Приносит подарки 31 декабря.
4. Санта Христиан (Африка). Живёт на вершине Килиманджаро. Приносит подарки 24 декабря.
5. Микулаш (Чехия). Сопровождает ангел в белоснежной одежде и лохматый чертёнок.  Приносит подарки 5 декабря.
6. Баббо Натале. (Италия). Живёт в Лапландии. Помогает   фея Бефана. Приносит подарки 24 декабря.
7. Йоулупукки (Финляндия). Живёт в Лапландии.  Жена Муори. Приносит подарки 24 декабря.
   
   Информация из свободных источников интернета. Я не была во всех странах и на деле её не проверяла :) 

Вопросы перед выполнением задания

1. Какие поля вы включите в таблицу? Какие типы у них будут?
2. Сколько полей у вас получилось? У меня получилось 5 полей.  Если у вас другое количество полей, обсудите с одноклассником или учителем.
3. Какое или какие поля  вы сделаете ключевыми? Имена Делов Морозов в разных странах могут совпадать. 
4. 
   

Задание 4. 

1. Добавьте в таблицу поле Изображение. Файлы с изображениями Дедов Мороза расположены в папке D:\для занятий\СУБД\Создание баз данных\Дед Мороз.

2. Внесите в таблицу информацию о Деде Морозе любой страны, которую я не брала.

Задание 5. Подумайте, какую таблицу вы бы могли добавить в базу данных Новый год.  Это может быть даже ваша фантазия. Добавьте её. Таблицы должны иметь связь по какому-то полю.

Требования к таблице: 

1. От 4 полей.

2. От 3 записей.

 

Язык программирования Паскаль: структура программы, команда вывода данных

 

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

СОСТАВЛЯЕМ ПРОГРАММЫ

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

Задание 2.  

а) Выполните программу

begin

  write('Вечор, ты помнишь, вьюга злилась,');

  write('На мутном небе мгла носилась;');

  write('Луна, как бледное пятно,');

  write('Сквозь тучи мрачные желтела,');

  write('И ты печальная сидела —');

  write('А нынче… погляди в окно:');

  write('Под голубыми небесами');

  write('Великолепными коврами,');

  write('Блестя на солнце, снег лежит;');

end.

б) Замените все команды write на writeln. Выполните программу. Что произошло? Почему?

Покажите результат выполнения учителю.

Задание 3. 

а) Выполните программу. Что вывелось в результате выполнения программы?

begin

  write('5*5+7=');

end.

 

б) Замените команду  write('5*5+7='); на  write('5*5+7=' , 5*5+7); Выполните программу. Что вывелось в результате выполнения программы? Какой вывод вы можете сделать? Мы можем соединять в одной команде  текст и выражения?

в) Выполните упр. 5 п. 1 параграф 14. 

Покажите результат выполнения учителю.

Понятие электронной таблицы

ИГРАЕМ

Составляем понятие

Элементы окна

Скачки

Кроссворд по понятиям

Тест

Составление алгоритмов для работы с графикой

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

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

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

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

Задание 3. Увеличьте количество рядов окружностей.

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

Подсказки:

1. Какая процедура позволяет рисовать прямоугольник? Стр. 159. 

2. Вторую вершину прямоугольника можно получить из первой, добавив какое-то число. Например, rec...(x,y,x+...,y+...);

3. Вам надо рассчитать или подобрать расстояние между прямоугольниками. За это отвечают команды х:=х+...; у:=у+...;

Задание 5.  Составьте программу для получения следующего изображения.

Редактирование текста

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

 
ПРЕЗЕНТАЦИЯ

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

Откройте файл  редактирование в папке D:\для занятий\6 класс\ТР. Открыть вам поможет команда Файл/Открыть. Выполняйте задания из файла. 

Сделать задания более наглядными.

ИТОГИ УРОКА

Составление алгоритмов обработки строковых величин. Повышенный

 

Задача. С клавиатуры вводится пример вида число 1 + число 2= Вывести на экран сам пример и результат вычислений.

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

Задание 3. С клавиатуры вводится пример вида число 1 * число 2= Вывести на экран сам пример и результат вычислений.

Задание 4. С клавиатуры вводится пример вида число 1 знак операции число 2= Вывести на экран сам пример и результат вычислений. Возможные знаки: +, -, *, /

Задание 5.  Вводится строка вида d1+d2+…+dn, где d1, d2, …, dn — числа. Вычислить значение выражения. Знак может быть +, -, *, /

Понятие базы данных. Система управления базами данных (СУБД

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

ИГРАЕМ

Алгоритмическая конструкция «ветвление»

 

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

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

Задача.  Через клетку от Робота могут быть стены. Робот делает шаг в одном из направлений. Если слева, справа, сверху или снизу  есть стена, он закрашивает клетку, в которой стоит. Обстановка if2.

ЗАКРЕПЛЕНИЕ МАТЕРИАЛА

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

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

Задание 3-4. Рассмотреть оставшиеся 2 случая для предыдущей задачи

Составление алгоритмов для работы с графикой

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

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

Задание 2. Составить программу для получения следующего изображения. Расстояние между линиями задайте сами.

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

Обобщающее повторение по теме «Алгоритмы обработки массивов»

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

ТЕСТ

Использование условий. Цикл с предусловием

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

ЗАКРЕПЛЕНИЕ МАТЕРИАЛА

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

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

Вставка и замена в тексте

Задача. Заменить в тексте слово «ноябрь» на «декабрь».  Слова в тексте отделяются друг от друга пробелами. В конце текста тоже стоит пробел.

var s:string;

    ns:integer;

begin

  readln(s);

  ns:=pos('... ',s);{ищем  слово, которое будем заменять}

  while ns>0 do {повторяем действия пока в тексте есть это слово}

             begin

             ... {удалеям слово}

             ...('...',s,...);{вставляем новое слово}

            ...{ищем снова слово}   

            end;

writeln(s);                          

end.

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

Задание 2. Заменить в тексте слово «ноябрь» на «декабрь».  Слова в тексте отделяются друг от друга пробелами. В конце текста тоже стоит пробел.

Задание 3. Заменить в тексте слова «золотая осень» на «зима».

Задание 4.  Заменить в тексте все числа 5 на «пять» и все 7 на «семь».. 

Задание 5. Заменить в тексте «осень» на «зима». Учитывая, что слова могут быть записаны с заглавной и строчной букв. 

Оператор цикла с условием

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

while условие do команды;

>

<

=

<>

>=

<=

Формат команды «While»:

while условие do оператор; 

При выполнении команды «While» сначала проверяется условие. Если оно истинно, то выполняются команды, входящие в тело цикла, затем условие проверяется снова, и т. д. Таким образом, команды цикла выполняются до тех пор, пока условие истинно. Если условие ложно, то цикл заканчивается.

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

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

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

Задание 2. С клавиатуры вводится последовательность чисел. Ввод заканчивается, когда пользователь ввёл ноль. Найдите сумму введённых чисел.

Задание 3. С клавиатуры вводится последовательность чисел. Ввод заканчивается, когда пользователь ввёл любое отрицательное число. Найдите сумму введённых чисел.

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

 

Текстовый редактор.Урок 10. 6 класс

ПРЕЗЕНТАЦИЯ

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

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

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

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

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

Справка.

«,» -  Shift+.

Преобразование элементов массива. Урок 2

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

СОСТАВЛЯЕМ ПРОГРАММЫ

Задание 1. Играем и повторяем.

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

var m:array[1..10] of integer;

       p:...;

begin

 writeln(‘Введите 10 элементов массива’);

 for var i:=1 to 10 do …(m[i]);

…  

 writeln(‘После перестановки’);

 for var i:=1 to 10 do …(m[i]);

end.

Задание 3. Составить программу, которая меняет местами первую половину массива: первый и второй, третий  и четвёртый,... , а вторую половину не трогаем. Количество элементов в массиве 12.

Алгоритмическая конструкция «повторение»

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

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

СОСТАВЛЯЕМ ПРОГРАММЫ ДЛЯ ИСПОЛНИТЕЛЯ РОБОТ

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

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

Задание 3. Составьте программу для решения задачи с3 (обстановку можно посмотреть в упр. 3 стр. 67). Покажите учителю.

Оператор цикла

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

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

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

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

Задание 3.  Измените программу, чтобы у вас выводилось ваше имя в строку через пробел 25 раз. Команда для вывода в строку write.

Операции над фрагментами

 

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

ПРЕЗЕНТАЦИЯ

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

Файлы для работы можно скачать здесь 

Задание 1. Загрузите графический редактор Paint. 

Задание 2. 

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

Задание 3. 

1. Загрузите файл Отображение_испр из папки D:\для занятий\6 класс\ГР. 
2. Сохраните файл в папку D:\ученики\6А(Б,В,Г) под именем Отображение фамилия.
3. Выполните задание из файла.
4. Сохраните изменения в файле Файл\Сохранить.

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

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

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

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

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

Исполнитель Робот

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

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

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

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

uses robot;

 ... zakr;

 begin

  paint; down; paint; right;

  paint; up; paint;

 end;

 procedure perexod;

 begin

  right; right;

 end;

begin

 field(8,2);

 left;left;left;...;

 up;

 zakr;perexod;

...

end.

Задание 3. Измените программу так, чтобы Робот закрашивал 5 таких квадратов. 

1.  Вам надо изменить ширину поля: добавиться 2 квадрата шириной по 2 клеточки и 2 прохода ашириной в одну клетку, т. е. 8+2*2+2=14 клеток.

2. Измениться начальное положение Робота, ему надо пойти 7 раз влево, а не 4. 

....

begin

 field(14,2);

 left;

 left;

 left;

 left;

 left;

 left;

...

3. Добавить процедуры закраски и перехода. Перед end. надо добавить их имена.

Задание 4. Составьте узор для шахматной доски. Берём одну линию высотой в 2 клеточки.

Задание 5. Получить полную шахматную доску.

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

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

if  условие then

                     begin

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

                    end

                 else

                  begin

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

                 end;

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

if  условие then

                     begin

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

                    end;

               

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

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

1. Вычисляется значение условия.

2. Если условие истинно, выполняются команды, следующим за словом then.

Если условие ложно, выполняются команды, следующим за словом else.

3. Управление передается командам, следующим за условным оператором.

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

Задание. Компьютер спрашивает, сколько  книг ты читаешь в месяц?  Если больше 2, то на экране появляется надпись «Хорошо!», иначе «Может, стоит читать больше?». 

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

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

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

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

Операции над фрагментами изображения

 ПРЕЗЕНТАЦИЯ

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

Задание 1. Загрузите графический редактор Paint. 

Задание 2. 

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

Задание 3. 

1. Загрузите файл Лишняя фигура.bmp из папки D:\для занятий\6 класс\ГР. 
2. Сохраните файл в папку D:\ученики\6А(Б,В,Г) под именем Лишняя фигура фамилия.
3. Выполните задание из файла. 
4. Сохраните изменения в файле Файл\Сохранить.

Максимальный и минимальный элементы массива. Урок 2

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

var t: array[1..7] of integer;

    maxi,mini:...;

begin

 writeln('Введите температуры за неделю '); 

 for var i:=1 to 7 do readln(...);

 

 maxi:=1;

 for var i:=2 to 7 do 

                    if t[i]>t[maxi]  then maxi:=..;

 mini:=1;

 for var i:=2 to 7 do 

                    if t[i]<t[mini]  then mini:=...;

 

 writeln('Макс. темп. ' ,t[maxi], ' в ', ... ,' день' );

 writeln('Мин. темп. ' ,t[mini], ' в ', mini, ' день' );

 writeln(t[maxi]-t[...]);

end.

СОСТАВЛЯЕМ ПРОГРАММЫ

Задание 2. Составьте программу, которая будет находить разность максимальной и минимальной температур.

Задание 3. Учёные проводят исследования. И им необходимо знать сумму максимального и минимального значения температур. Выведите на экран эту сумму.

Исполнитель Робота

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

ИНТЕРЕСНЫЕ ФАКТЫ О РОБОТАХ

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

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

Задание 2. 

1) Наберите программу Примера 9.5 стр. 56.  

2) Выполните программу. Для выполнения программы можно нажать клавишу F9 на клавиатуре. Если программа записана верно, то у вас появится окно исполнителя Робота. Для выполнения программы нажимайте несколько раз клавишу Пробел или Enter.

Если после нажатия клавиши F9 окно исполнителя Робот не появилось, то у вас, вероятно, ошибка. Сравните программу ту, что в учебнике и у вас, найдите ошибку. Если не нашли сами, попросите помощи у одноклассников.

Задание 3. Измените программу так, чтобы закрасились все клетки по пути следования. 

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

Составление алгоритмов обработки строковых величин

 

Задача 1. В строке вида логин:пароль@сервер. Заменить каждый символ пароля *.

Ввод:

masha:123456@qwe.biz

Вывод:

masha:******@qwe.biz

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

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

Задача 3. Дана строка вида имя пользователя@логин#пароль/ник Замените каждый символ пароля %

Задача 4.

Разберите решение задачи.

Задача. Дана строка вида логин:пароль@сервер. Посчитайте сколько цифр в пароле.

Ввод:

masha:qwe987@qwe

Вывод:

3

var s:string;

     k {кол-во цифр в пароле},

     m {для перебора символов в строке, обозначает номер символа в строке},

     n1 {номер :},

     n2 {номер @}:integer;

begin

  readln(s);

  n1:=pos(‘:’,s); {определяем номер первого двоеточия :}

  n2:=pos(‘@',s); {определяем номер первой собаки}

  k:=0;

  for m:=n1+1 to n2-1 do

   if (s[m]>=’0’) and (s[m]<=’9’) then k:=k+1 ; {если символ в пароле цифра, то увеличиваем кол-во на 1}

  writeln(k);

end.

Решите задачу. Дана  строка символов. Проверить, является ли строка записью целого числа. Число вводится без пробелов.

Примеры

Ввод:

100010

Вывод:

является

Ввод:

27 арбузов

Вывод:

не является

Задача 5. Дана  строка символов. Проверить, является ли строка записью числа. Число может быть записано с пробелом, например, 100 000, число может быть дробным, например, 5,2

Примеры

Ввод:

100010

Вывод:

является

Ввод:

11,5

Вывод:
является

Ввод:

27 арбузов

Вывод:

не является

ДЗ

Задача. Проверить, является ли строка записью числа римскими цифрами.

Ввод:

XХIV

Вывод:
является

Ввод:

Лето 2000 года

Вывод:

не является

ДОМАШНЕЕ ЗАДАНИЕ