русс | укр

Языки программирования

ПаскальСиАссемблерJavaMatlabPhpHtmlJavaScriptCSSC#DelphiТурбо Пролог

Компьютерные сетиСистемное программное обеспечениеИнформационные технологииПрограммирование

Все о программировании


Linux Unix Алгоритмические языки Аналоговые и гибридные вычислительные устройства Архитектура микроконтроллеров Введение в разработку распределенных информационных систем Введение в численные методы Дискретная математика Информационное обслуживание пользователей Информация и моделирование в управлении производством Компьютерная графика Математическое и компьютерное моделирование Моделирование Нейрокомпьютеры Проектирование программ диагностики компьютерных систем и сетей Проектирование системных программ Системы счисления Теория статистики Теория оптимизации Уроки AutoCAD 3D Уроки базы данных Access Уроки Orcad Цифровые автоматы Шпаргалки по компьютеру Шпаргалки по программированию Экспертные системы Элементы теории информации

Задания


Дата добавления: 2014-11-28; просмотров: 2187; Нарушение авторских прав


1. Отметьте те выражения, результат которых вычислен правильно:

 

a) 60>20 = true

b) not (30> 10) = false

c) (3>2) and (5>6) = true

d) (60>70) or (100<90) = true

e) (60>70) and (100<90) = true.

 

2. Предположим А:=5; B:=10; C:=15.

Вычислите значение выражения (true, false):

 

Выражение Результат Выражение   Результат  
(А=В) or (A<=B)   Not (A>=5)  
(А=В) and (A<=B)   (С=А+В) or (B>C)  
not(A=B) and (A<B)   (С<=А-В) or (B<C)  
(В<=12)ог(С=15)   (С<=А+В) or (B>C)  
(B<=12)and(C=15)   (С=А+В) and(B<C)  

3. Запишите логическое выражение для каждой из фраз:

А принадлежит диапазону (18; 80)___________________________________

А принадлежит диапазону [18; 80) __________________________________

А принадлежит диапазону (-10; 18) __________________________________

А принадлежит диапазону [-10; 18] _________________________________

А не принадлежит диапазону [-10; 18]_______________________________

А не принадлежит диапазону (-10; 18) _______________________________

А меньше -1 или больше 1_________________________________________

А не принадлежит диапазону [18; 80) _______________________________

А больше 0 и не равно 10__________________________________________

А кратно 4 и 5 (используйте mod)__________________________________

4. Запиши словесное описание фрагмента алгоритма на языке Паскаль:

1) Если число Х равно 47, то увеличить переменную Х на 15, иначе уменьшить на 36;

2) Если переменная S не равна 21, то увеличить переменную S в 6 раз, иначе уменьшить на 53;

3) Если переменная U нечетная, то увеличить ее на 8, иначе увеличить в 53 раза;



4) Если число Z больше 48, то увеличить на 51, иначе уменьшить на 51;

5) Если X меньше 15, то Y присвоить значение X/2, а Z присвоить значение 15/ X, иначе Y присвоить значение X*2, а Z присвоить значение 15- X.

5. Расставь строки программы в правильном порядке, чтобы получилась программа, которая находит решение уравнения ах=b:

1) writeln(‘решения нет’)  
2) a,x,b:real;  
3) if  
4) writeln(‘x=’,b/a);  
5) a<>0  
6) begin  
7) then  
8) readln(a,b)  
9) end.  
10) else  

6. Что будет выведено на экран, после выполнения данной программы:

  a=8, n=5     a=3, n=3   a=9, n=2   a=7, n=4
Program Primer; Var x, y:integer; Begin Read(a,n); if a<=10 then writeln(a*2) else writeln(n*2); End. Program Primer; Var x, y:integer; Begin Read(a,n); If a mod 3<>0 then writeln(a+5) else writeln(n+2); End. Program Primer; Var x, y:integer; Begin Read(a,n); If (a mod 2=0) and (n<>2) then writeln(a*5) else writeln(n*5); End. Program Primer; Var x, y:integer; Begin Read(a,n); If (a mod 2=0) or (n<>2) then writeln(a*5) else writeln(n*5); End.
Ответ: __________ Ответ: __________ Ответ: __________ Ответ: __________  

7. Заполните таблицу:

x y a
 
 
 
 

Program Primer;

Var a, x, y:integer;

Begin

Read(x,y);

If (x+y>50) or (y>100) Then

A:=x+y

Else

A:=2*x+y;

Write(a);

End.

8. Представьте фрагмент программы в виде блок-схемы

 
 


а)

IF a>b THEN

k:=k+l

ELSE

IF b>c THEN

k:=k+2

ELSE

k:=k+3;

Writeln(k)

б)

IF a=0 THEN

Begin

X:=l;

Y:=l;

End

ELSE

Begin

X:=2;

Y:=2;

End;

 
 


в)

IF a=b THEN

z:=a+b

ELSE

Begin

IF a>0 THEN

a:=2*a;

a:=a-l; b:=b-l;

z:=a/b;

End;

z:=z+10;

9. Запишите оператор IF, эквивалентный следующему оператору CASE.

CASE x OF

2, 5 : writeln ('Ничья');

7..11: writeln ('Выигрыш')

ELSE

writeln ('Проигрыш')

END;

10. Определить, что будет выведено на экран после выполнения фрагмента программы:

 

k:=10; CASE k mod 3 OF 0: writeln('k=4m'); 1: writeln('k=4m+l'); 2: writeln('k=4m+2'); 3: writeln('k=4m+3'); END;   d:=30; s:=1000; Case d of 1..5: s:=15; 6..10: s:=36; 11..25: s:=30; End; Writeln(s);   m:=43; s:=1234; case m of 10..15: s:=30; 20..25: s:=5; 30..35: s:=25; End; Writeln(s);
____________________ ___________________ _______________

11. Запишите оператор CASE, эквивалентный следующему оператору IF.

……………………….

If (x>=a) and (x<=b) then

writeln ('Хорошо')

else

If (x = d) or (x = f) then

writeln ('Плохо')

else

writeln ('Неверный ввод');

……………………….

12 . Составьте программы для следующих задач:

Задачи Отметка
Дано число х. х2+1, если х <0 1) Вычислить значение функции: У= x-2,1,если х> Sin x, если 0 х  
2) По введенному году обучения в школе (числу от 1 до 11) вывести сообщение «Привет, k-классник!». Например, если k=1, «Привет, первоклассник!»  

13. Разгадайте сканворд:

 



<== предыдущая лекция | следующая лекция ==>
Задания | Самостоятельная работа


Карта сайта Карта сайта укр


Уроки php mysql Программирование

Онлайн система счисления Калькулятор онлайн обычный Инженерный калькулятор онлайн Замена русских букв на английские для вебмастеров Замена русских букв на английские

Аппаратное и программное обеспечение Графика и компьютерная сфера Интегрированная геоинформационная система Интернет Компьютер Комплектующие компьютера Лекции Методы и средства измерений неэлектрических величин Обслуживание компьютерных и периферийных устройств Операционные системы Параллельное программирование Проектирование электронных средств Периферийные устройства Полезные ресурсы для программистов Программы для программистов Статьи для программистов Cтруктура и организация данных


 


Не нашли то, что искали? Google вам в помощь!

 
 

© life-prog.ru При использовании материалов прямая ссылка на сайт обязательна.

Генерация страницы за: 0.079 сек.