Подумай и реши! Ввести с клавиатуры два числа A,B. Ввести с клавиатуры два числа A,B. R eadln (A,B); R eadln (A,B); Переменным A,B присвоить значения. - презентация

1

2 Подумай и реши! Ввести с клавиатуры два числа A,B. Ввести с клавиатуры два числа A,B. R eadln (A,B); R eadln (A,B); Переменным A,B присвоить значения. Переменным A,B присвоить значения. A:=5; B:=3; A:=5; B:=3; Вывести на печать два числа A,B. Вывести на печать два числа A,B. Writeln (А,В); Writeln (А,В); Вывести на экран значения двух чисел A,B. Вывести на экран значения двух чисел A,B. Writeln (А,В); Writeln (А,В);

3 1.Печать целых чисел. 2.Печать дробных чисел. 3.Решение задач 4.Самостоятельная работа

4 Пусть А=45, В=123, тогда при выполнении Writeln (А,В); значения А и В сольются в одно число: Чтобы разделить числа, используют форматы печати, определяя для каждой переменной количество позиций в строке. Оно записывается после имени переменной через ":" Таким образом, оператор можно записать так: Writeln (A:4, B:6); и на экране значения будут напечатаны в виде _ _45_ _ _123

5 Число с плавающей точкой с плавающей точкойЧисло с фиксированной точкой

6 Дробное число в памяти компьютера представлено в стандартном виде: 1.Целая часть числа - это 1 цифра, не равная 0, 2.Остальные цифры записываются в дробную часть. В дробной части - 10 цифр. Чтобы исходное число сохранило свое значение, его следует умножить на 10 в соответствующей (положительной или отрицательной) степени. 3. Выражение "умножить на 10 в степени" компьютер записывает одним символом "Е" Е Е Е Е-05

7 Таким образом, число 1243,563 будет иметь вид: Е+03, число 0, будет иметь вид: Е-05. Именно в этом виде и будет напечатано значение любой переменной X типа real, если в программе выполняется оператор Writeln (X);

8 Чтобы напечатать дробное число в привычном нам виде, который называется "число с фиксированной точкой", следует указать для него форматы печати, которые выбираем по своему желанию: Writeln ( имя: колич. всех знаков: колич. знаков на дроб.часть); Writeln (X:6:2); ==> 234.56">

9 Пусть Х=1243,563, тогда Writeln (X:8:2); ==> _ Writeln (X:13:5); ==> _ _ _ Writeln (X:10:3); ==> _ _ Writeln (X:8:1); ==> _ _1234.6

10 Введя с клавиатуры площадь и одну сторону прямоугольника, найти длину другой стороны. S – площадь прямоугольника a – одна сторона прямоугольника b - ?

11 Program S; var a,b,S: real; Begin write ('a:='); readln (a); write (S:='); readln (S); b:=S/a; writeln (b:=,b:4:2); readln End.

12 Домашняя работа Папа, воспитывая сына-двоечника, изнашивает в год 3 ремня. Ввести с клавиатуры количество изношенных папой ремней, определить: какой класс закончил сын. Папа, воспитывая сына-двоечника, изнашивает в год 3 ремня. Ввести с клавиатуры количество изношенных папой ремней, определить: какой класс закончил сын. Решение; Решение;

13 Program Remni; Uses Crt; var N :integer; M: real; Begin Clrscr; Write (Число изнош. ремней '); Readln (N); m:= N div 3 Writeln (Сын учится в ', m, кл); Readln End. Program Remni; Uses Crt; var N :integer; M: real; Begin Clrscr; Write (Число изнош. ремней '); Readln (N); m:= N div 3 Writeln (Сын учится в ', m, кл); Readln End.

14 Домашняя работа Маша Петрова сделала в диктанте М ошибок, а Гриша Кружков, который у нее все списал, - на К ошибок больше. Ввести с клавиатуры значения для М и К. Сколько ошибок сделал Гриша?