Меню
Разработки
Разработки  /  Информатика  /  Практикумы  /  10 класс  /  Практическая работа "Логические величины"

Практическая работа "Логические величины"

Подобраны задачи (не из учебника) для проведения работы на компьютере

13.02.2018

Содержимое разработки

Логические величины, операции, выражения


1. Дано целое число A. Проверить истинность высказывания: «Число A является нечетным».

Для того чтобы узнать, является ли данное число нечетным в Паскале предусмотрена специальная функция Odd, которая возвращает true, если число нечетное и false, если число четное.

program n_1;

var a: integer; b : boolean;

begin

write('Введите число A: ');

read(a);

b := Odd(a);

writeln('Число A является нечетным - ', b); { Можно обойтись и без b }

end.

Что делает следующая программа? Вместо … впишите ответ.

program n_2;

var n: integer; ans: boolean;

begin

write ('Введите исходное число');

readln (n);

ans:=n mod 2=0;

writeln ('Число ', n,' является - ', ans)

end.

2. Даны два целых числа: A, B. Проверить истинность высказывания: «Ровно одно из чисел A и B нечетное». 

Используем xor.

program n_3;

var a,b: integer; c :boolean;

begin

write('Введите число A, B: ');

read(a,b);

c := (Odd(a)) xor (Odd(b));

writeln('Ровно одно из чисел A и B нечетное - ', c);

end.

3. Треугольник со сторонами a, b, c является равносторонним.

program proverka;

Задание:

  1. Написать программу «Определение истинности высказывания о равнобедренном треугольнике»

  2. Дано четырехзначное число. Проверить истинность высказывания: «Данное число читается одинаково слева направо и справа налево».

Оценивание:
1. За простое воспроизведение (набор программы) без проверки оценка «3»
2. За проверку работы программы, ответы на вопросы по программе оценка «4»
3. За решение всех заданий, изменение программы оценка «5»



uses crt; /зачем нужна эта команда?/

var a,b,c: real; d:boolean;

begin

clrscr; /зачем нужна эта команда?/

write('введите A, B , C');

readln(a,b,c);

d:= (a=b) and (a=c) and (b=c);

write(d);

end.


-75%
Курсы повышения квалификации

Интерактивные методы в практике школьного образования

Продолжительность 72 часа
Документ: Удостоверение о повышении квалификации
4000 руб.
1000 руб.
Подробнее
Скачать разработку
Сохранить у себя:
Практическая работа "Логические величины" (23.27 KB)

Комментарии 0

Чтобы добавить комментарий зарегистрируйтесь или на сайт