Лабораторные работы №№1-5 по дисциплине: Информатика. Семестр 2-й. Вариант № 9

ПРОГРАММИРОВАНИЕ РАЗВЕТВЛЯЮЩИХСЯ ПРОЦЕССОВ

Цель работы: Получить навыки программирования разветвляющихся процессов на алгоритмическом языке.

Задание к лабораторной работе:
Даны три числа a, b, c. Выяснить, верно ли, что a < b < c. Ответ получить в текстовой форме: верно или неверно.
Схема алгоритма

Программа на языке Visual Fox Pro
&& Сравнение чисел a, b, c
TRY
&& Ввод исходных данных
 a = Thisform.text1.Value
 a = IIF(TYPE('a')=="N", a, VAL(a))
 b = Thisform.text2.Value
 b = IIF(TYPE('b')=="N", b, VAL(b))
 c = Thisform.text3.Value
 c = IIF(TYPE('c')=="N", c, VAL(c))
CATCH
ENDTRY
&& Вывод результатов
IF a < b
 IF b < c
  this.Value = 'верно'
 ELSE
  this.Value = 'неверно'
 ENDIF
ELSE
 this.Value = 'неверно'
ENDIF
Результаты выполнения программы на конкретных примерах

Уважаемый слушатель, дистанционного обучения, Оценена Ваша работа по предмету: Информатика Вид работы: Лабораторная работа 1-5 Оценка:Зачет Дата оценки: 07.05.2013 Рецензия:Уважаемый ,

Ваша лабораторная работа зачтена.

Сваровский Иван Николаевич