🗊Презентация Ввод данных с клавиатуры. (Урок 11-12)

Нажмите для полного просмотра!
Ввод данных с клавиатуры. (Урок 11-12), слайд №1Ввод данных с клавиатуры. (Урок 11-12), слайд №2Ввод данных с клавиатуры. (Урок 11-12), слайд №3Ввод данных с клавиатуры. (Урок 11-12), слайд №4Ввод данных с клавиатуры. (Урок 11-12), слайд №5Ввод данных с клавиатуры. (Урок 11-12), слайд №6

Вы можете ознакомиться и скачать презентацию на тему Ввод данных с клавиатуры. (Урок 11-12). Доклад-сообщение содержит 6 слайдов. Презентации для любого класса можно скачать бесплатно. Если материал и наш сайт презентаций Mypresentation Вам понравились – поделитесь им с друзьями с помощью социальных кнопок и добавьте в закладки в своем браузере.

Слайды и текст этой презентации


Слайд 1





Урок №11_12
Ввод данных с клавиатуры
Описание слайда:
Урок №11_12 Ввод данных с клавиатуры

Слайд 2






Program  Operation;
uses crt;
var
A, B, C: real;
Begin
clrscr;
A:=17.3;
B:=3.4;
C:=5.1;
C:=A*B*C; Writeln (‘объем= ' , C)
End.
Описание слайда:
Program Operation; uses crt; var A, B, C: real; Begin clrscr; A:=17.3; B:=3.4; C:=5.1; C:=A*B*C; Writeln (‘объем= ' , C) End.

Слайд 3





Ввод данных с клавиатуры
Ввод данных с клавиатуры удобен тем, что в программу при каждом запуске можно вводить разные начальные значения переменных. 
Program Input;
Uses Crt;
var
  N: integer;
begin
    ClsScr;
    write(‘ВВЕДИТЕ ЧИСЛО С КЛАВИАТУРЫ:’); 
    readln(N); {Здесь программа приостановится и будет ожидать ввода с клавиатуры. Наберите число и нажмите Enter}
end.
Описание слайда:
Ввод данных с клавиатуры Ввод данных с клавиатуры удобен тем, что в программу при каждом запуске можно вводить разные начальные значения переменных. Program Input; Uses Crt; var N: integer; begin ClsScr; write(‘ВВЕДИТЕ ЧИСЛО С КЛАВИАТУРЫ:’); readln(N); {Здесь программа приостановится и будет ожидать ввода с клавиатуры. Наберите число и нажмите Enter} end.

Слайд 4






Program  Operation;
uses crt;
var
A, B, C: real;
Begin
clrscr;
Writeln (‘введи значение A = ');
read(A);
Writeln (' введи значение B = ');
read(B);
Writeln (' введи значение C = ');
read(C);
C:=A*B*C; Writeln ('îáúåì = ' , C)
End.
Описание слайда:
Program Operation; uses crt; var A, B, C: real; Begin clrscr; Writeln (‘введи значение A = '); read(A); Writeln (' введи значение B = '); read(B); Writeln (' введи значение C = '); read(C); C:=A*B*C; Writeln ('îáúåì = ' , C) End.

Слайд 5





Задание
Переделать программы с предыдущих уроков, используя ввод данных с клавиатуры:
Ввести длины рёбер a, b, c прямоугольного параллелепипеда. Найти его объём V=abc и площадь поверхности S=2(ab+bc+ac).
Найти расстояние между точками с заданными координатами х1 и х2 на числовой оси: |x2-x1|. Координаты ввести с клавиатуры.
Ввести площадь круга с клавиатуры. Найти его диаметр D и длину окружности L, ограничивающей этот круг, учитывая, что
L= 2R; S= R2
Использовать =3.14
Напишите программу для вычисления дискриминанта квадратного уравнения. Коэффициенты A, B, C ввести с клавиатуры:
D=B2-4*A*C
Найти значение выражения:
Описание слайда:
Задание Переделать программы с предыдущих уроков, используя ввод данных с клавиатуры: Ввести длины рёбер a, b, c прямоугольного параллелепипеда. Найти его объём V=abc и площадь поверхности S=2(ab+bc+ac). Найти расстояние между точками с заданными координатами х1 и х2 на числовой оси: |x2-x1|. Координаты ввести с клавиатуры. Ввести площадь круга с клавиатуры. Найти его диаметр D и длину окружности L, ограничивающей этот круг, учитывая, что L= 2R; S= R2 Использовать =3.14 Напишите программу для вычисления дискриминанта квадратного уравнения. Коэффициенты A, B, C ввести с клавиатуры: D=B2-4*A*C Найти значение выражения:

Слайд 6





Ответы:
При х=10 F=25107.495
При х=0 F=10.696
При х=1 F=-15.975
При х=-1 F=1.218
Описание слайда:
Ответы: При х=10 F=25107.495 При х=0 F=10.696 При х=1 F=-15.975 При х=-1 F=1.218



Похожие презентации
Mypresentation.ru
Загрузить презентацию