Презентация по информатике на тему Pascal: ввод и вывод сообщений
Тема2Turbo Pascal: Ввод и вывод сообщений на экран Куликова О.А., МБОУ СОШ № 31, г. Владимир Write и Read – операторы ввода и вывода Write(‘После вывода текста на экран остаёмся в той же строке’);Writeln (‘После вывода текста на экран происходит переход на новую строку ’);Read(x); //помещаем в x данные и остаёмся в той же строке;Readln(x); //помещаем в x данные и переходим на новую строку;Readln; //задержка экрана до нажатия ENTERWriteln; //перевод курсора на новую строку без ввода текста Вспомним: Начало программы: program funct1 Имя программы должно отражать содержание ; В конце строки обязательно должны стоять Для использования всех возможностей клавиатуры и дисплея подключаем… Uses Crt В конце строки обязательно должны стоять ; Блок объявления переменных var X: Тип данных «целые числа» integer ; В конце строки обязательно должны стоять Тип строковых данных Nstr: string В конце строки обязательно должны стоять ; Тело программы начинается словами… begin Очищаем экран ClrScr ; Выводим текстовое сообщение на экран Writeln (‘Введите свое имя’) ; Помещаем в строковую переменную введенное с экрана Readln (Nstr) ; Используем содержимое переменной для вывода на экран Writeln (‘Привет, ’,Nstr) ; Возвращаемся в код и заканчиваем программу ReadKey ; end. Найди ошибки Programm 123;Use crtVar x; integer: y; string:Begin;Writelen(Введите имя)Read(‘x’);Writeln(‘Привет’, y );ReadKey;Andhttp://learningapps.org/display?v=vqtbsgpn&preview=1 Задача1 Запросить личные данные пользователя: Имя, дату рождения, пол. Вывести их на экран следующим образом:+++++++++++++++++++Ваши данные:Имя, полДата рождения+++++++++++++++++++ Решение задачи1 program visitka;uses crt;var im, pol, data: string;beginclrscr; // очищаем экранwriteln(‘Введите своё имя’); //запрашиваем исходные данныеreadln(im);writeln(‘Ваш пол:’);readln(pol);writeln(‘Дата рождения:’);readln(data);clrscr; // очищаем экран, чтобы визитка была создана на чистом экранеwriteln(‘+++++++++++++++++++’); // создаём визиткуwriteln(‘Ваши данные:’);writeln(im, ‘, ’, pol);writeln(data);writeln(‘+++++++++++++++++++’);readkey;end. Удачи в изучении Pascal!