Презентация по информатике на тему Ввод-вывод данных(Pascal) (7 класс)

Урок третий Процедуры ввода и вывода

Ввод данных Для ввода данных используются процедуры READ и READLN. Read(список_переменных)- Процедура при считывании данных переход на другую строку не делает. Readln(список переменных))- при считывании данных происходит переход на другую строку

Благодаря этой рекламе сайт может продолжать свое существование, спасибо за просмотр.

Эти процедуры при работе в стандартном режиме выполняют два действия: При использовании этих процедур необходимо помнить: 1) Они требуют обязательного ввода некоторой информа- ции! Если Вы таковую не введете, а просто нажмете Enter, то работа процедуры не закончится, она будет снова и снова входить в режим ожидания! 2) При введении нескольких данных разделять их или пробелами, или Enter, но не запятыми!

Вывод данных Используют процедуры Write и Writeln . Write(список_элементов_вывода) Writeln(список_элементов_вывода) Write - выводит элементы в строку (друг за другом без пробелов и курсор остается в этой же строке). Writeln - после вывода элементов в строку переводит курсор в начало следующей строки.

Вывод данных Числовые значения можно выводить, задав формат вывода! Write(имя1[действие]:кол-во позиций для числа: кол-во после запятой ) Например, Write(а: 0: 3), число а=23,123456 выведет как 23.123, т.е. три знака после запятой

Применение процедур вывода! 1) если WRITE(‘текст‘), то выводится текст, заключен- ный в апострафы. Аналогично Writeln. 2) если WRITE(числовое выражение),то выводится результат 3) если WRITE(имя), то выводится значение этой переменной 4) если WRITE(имя1,имя2), то выводятся подрят эти значения 5) если WRITE(алгебраическое выражение), то - его результат 6) если WRITE(текст,имя, текст,выражение), то на экран вы- водится текст, значение переменной с именем имя1, опять текст и затем результат выражения Точно такие же действия для WRITELN!

Выполнить задания 1. Каков будет результат данной программы: Program Task1, var b,c,d:real, begin read(b,c), d:=sqrt(sqr(b)-4*c), writeln(‘x1=‘,(-b+d)/2,’ x2=‘, (-b-d)/2), end. если заданы числа 1.0 и -2.9?

2. Что будет напечатано программой : Program Task2, var х:real, t: boolean, begin read(x), t:=x<,round(x), read(x), t:=t and (x<,trunc(x)), writeln(t), end. ?

3. Написать программу, которая печатает true или false в зависимости от того, имеют три заданных целых числа одинаковую четность или нет. 4. Нарисовать расположение чисел, напечатанных следующей последовательностью процедур: write(1), write(2,3), writeln(4), write(5,6), writeln, writeln(7,8)

5. Можно ли для программы Program Task5, var b:real, a:integer, begin read(a,b), writeln(a*b), end. задать в качестве исходных данных числа 5.0 и 6.2? 6. Что будет напечатано программой Program Task6, var a,b: integer, begin read(a,b,a), writeln(a,b,a), end. если для ввода заданы числа 1,2 и 3?

7 Написать программу, которая для заданного целого числа А печатает следующую таблицу : А А3 А6 А6 А3 А 8. Найти ошибки в следующих программах: Program TaskA, сonst d=5, begin d:=sqr(d), writeln(d), end. Program taskB, const k=true, var x: real, begin read(x),writeln(ord(x)=k), end. Program TaskC, var a,b,c:integer, begin read(a,b), writeln((a+b+c)/3), end. Program TaskD, var x:real, begin read(x), y:=sqrt(x)+1, writeln(y), end.

Домашнее задание. Составить программы Найти произведение цифр заданного четырехзначного числа. Определить число, полу-ченное выписыванием в обратном порядке цифр данного трехзначного числа. Вычислить длину окружности и площадь круга ,если радиус равен стороне квадрата, площадь которого S. Определить равна ли сумма двух первых цифр данного четырех-значного числа сумме двух его последних цифр. Определить, есть ли среди цифр заданного трехзначного числа одинаковые. Даны три произвольных числа. Можно ли построить треугольник с такими длинами сторон?

Дополнительно!!! Ввод и вывод данных с помощью файлов. Разберем один из самых популярных способов работы с файлами. Алгоритм работы ввода данных: Установим взаимосвязь с существующим файлом с именем, например, Input.txt. Для этого мы воспользуемся стандартной переменной INPUT и процедурой ASSIGN, записав в теле программы после слова BEGIN такую команду: Assign(input, input.txt), где input – стандартная переменная Pascal, ‘input.txt’- имя файла, из которого будут считываться данные.

Дополнительно!!! Алгоритм работы ввода данных: Откроем этот файл для чтения процедурой RESET, для этого после предыдущей процедуры запишем: Reset(input), Теперь можно считывать данные, с помощью процедуры Read(a), если данные записаны в строчку или Readln(a), если данные записаны в файле в столбик.

Алгоритм работы вывода данных: Установим взаимосвязь с будущим файлом с именем, например, Output.txt. Для этого мы воспользуемся стандартной переменной OUTPUT и процедурой ASSIGN, записав в теле программы такую команду: Assign(output, output.txt), где output – стандартная переменная Pascal, ‘output.txt’- имя файла, который будет создан и в него будут записаны данные. Откроем этот файл для записи процедурой REWRITE, для этого после предыдущей процедуры запишем: Rewrite(output), Теперь можно записывать данные, с помощью процедуры Write(a), если данные будем писать в строчку или Writeln(a), если данные вводим в столбик.

До скорых встреч!!! 1 урок 2-й 3-й