Студопедия

Главная страница Случайная страница

КАТЕГОРИИ:

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника






Теоретичні відомості. Тема: Введення й виведення даних, робота зі змінними






ЛАБОРАТОРНА робота № 9

Тема: Введення й виведення даних, робота зі змінними

Мета: Вивчити роботу операторів присвоєння, введення та виведення даних. Навчитися записувати арифметичні вирази та складати програму для їх обчислення.

Обладнання та програмне забезпечення: комп’ютер IBM РС, ТурбоПаскаль.

Теоретичні відомості

Приклад 1: Обчислити площу круга, якщо відома довжина кола.

1. Постановка задачі: дано L знайти S L, S - дійсні числа.

2. Модель та метод розв’язання: L=2*3.14 *R S= 3.14 * R*R звідси S = L * L / (4*3.14)

3. Складаємо програму: Сценарій роботи програми:

       
 
Program krug; Var L, S: real; Begin Write (‘Введи довжину кола в см.’); Readln (L); S: = L*L/(4*3.14); Writeln (‘ Площа круга S = ‘, S: 5: 2, ‘ кв.см. ‘); Readln End.  
   
Введи довжину кола в см. 30 Площа цього круга S = 71.66 кв.см.
 

 


 

ПАМ’ЯТЬ:

 

       
   

 


Приклад 2 діалогова програма екран виконання 1 вміст пам’яті

           
   
 
Program privet; Var name: string; Begin Write(‘як вас звуть ’); Readln(name); Writeln(‘ привіт, ‘, name); Readln End
   
як вас звуть Наташа привіт, Наташа  
 
 

 


екран виконання 2

       
 
як вас звуть Саша привіт, Саша    
 

 

 


Приклад 3: обчислення виразу екран виконання пам’ять

           
   
Введіть а х 7.25 5 A=7.25 X=5.00 Y=-1.64301
     
А 7.2500000000E+00
 
Program schet; Var a, x, y: real; Begin Write(‘введи а х ’); Readln(a, x); Y: = 1/(a+x)+sin(3*a)/cos(3*a); Writeln (‘a=’, a: 4: 2); Writeln(’x=’, x: 4: 2); Writeln (‘y=’, y: 7: 5); Readln End.  
 
     
Х 50000000000E+00
 
 

 


 

 
 
Y –1.6430175144E-01


 

 

 

 

 

 

Приклади запису виразів:

; ; ; tg2x = sin(2*x)/cos(2*x); ;

;


Поделиться с друзьями:

mylektsii.su - Мои Лекции - 2015-2024 год. (0.007 сек.)Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав Пожаловаться на материал