Практическая работа №7
«Реализация алгоритмов ветвления в среде программирования».
Цель:Закрепить полученные знания по программированию алгоритмов ветвления на языке Паскаль.
Ход работы
1.ответить на во Компьютерная программа – это …
2.Величины нужны для …
3.Описать величину – это значит ..
4.Укажите значение величины S после выполнения следующих команд:
S:=7; S:=23; S:=S+6;
5.В программе использован оператор ветвления.
If x>=3 then writeln (‘Зачет’) else writeln (‘Незачет’);
Какое значение будет выведено на экран дисплея, если x=7.
6.В программе использован оператор ветвления.
If x<1000 then writeln (‘да’) else writeln (‘нет’);
Какое значение будет выведено на экран дисплея, если Х=70.
2. Выполнить задания:
1.Какое значение будет иметь переменная р после выполнения программы, если с клавиатуры введено число 7?
ProgramPrimer1;
vara, b, p: integer;
Begin
writeln (‘Введите a’);
readln (a);
if (a>=7)
then begin
b:=3;
p:=a*a+b*b;
end
Else begin
b:=5;
p:=(a+b)*(a+b);
end;
writeln (‘ p=’, p);
End.
2.В программе использован оператор ветвления.
If a>=b then
begin
c:=a;
a:=b;
b:=c;
end
else b:=1;
writeln (a,b);
Какое значение будет выведено на экран дисплея, если a=10, b=20?
3.Исправьте ошибки и определите, что будет выведено на экран после выполнения программы, если с клавиатуры введены числа 2,3?
Var a,b: integer;
Program 2Task_1_13;
Begin;
Cls;
Writeln(‘Введите три целых числа’);
Readln(a,b,a)
c:=a+b;
Readln (‘a+b='c);
Readln;
end
3. Вывод.
#include <iostream>
using namespace std;
int main()
{
int n;
double s=0;
double st;
cout << "Введите n: ", cin >> n, cout << "\n";
for (int i=1; i<=n; i++) {
st = 1;
for (int j=1; j<=i; j++) st *=i;
s += (double)1/st;
}
cout << s;
return 0;
}
Пример:
Введите n:
3
1.28704
2. Если использовать функцию pow(), то так:
#include <iostream>
#include <cmath>
using namespace std;
int main()
{
int n;
double s=0;
cout << "n = ", cin >> n;
for (int i=1; i<=n; i++) s += (double)1/pow(i,i);
cout << s;
return 0;
}
Пример:
n = 3
1.28704
Информация - сведения независимо от формы их представления
Хранение данных микросхемы сохранять информацию, содержащуюся в ЭСППЗУ
Обработка данных - систематическое осуществление операций надданными
Канал связи - система технических средств и среда распространения сигналов для односторонней передачи данных (информации) от отправителя (источника) к получателю (приёмнику)
Защита - гарантия безопасности от чего-либо кому-либо или ряд действий и мероприятий по осуществлению этой гарантии
Организация - группа людей, деятельность которых сознательно координируется для достижения общих целей