Задание №2

Date: 2015-10-07; view: 342.

Задание №1

Рссчитать функцию:

если х

если х>5,3

CLS Enter

INPUT “введите значение х,” х

IF х < = +2 THEN y=x^(1/3): GOTO m1

IF x > 5.3 THEN y=x+30 : GOTO m1

PRINT “ x не из области определения”:GOTO m2 или : END

m1 : PRINT “Ответ: у=”; у Enter

m2 : END

F5

Задайте значение х= -8

Ответ: у= -2

Сравнить два числа:

CLS Enter

REM “Сравнение чисел'

INPUT “Задайте два числа,” А,В

IF A>B THEN PRINT “1-ое число>2-го” : END

IF A>B THEN PRINT “1-ое число<2-го” : END

PRINT “числа равны”

F5

Задание №3 REM «Помощник кассира»

CLS

INPUT”Что покупаете”;A$

IF A$=”Хлеб”THEN GOTO m1

PRINT”расчет в другой кассе”:GOTO m2

m1: INPUT “Цена единицы товара”;B

INPUT”Количество товара”;C

S=C*B

INPUT”Сколько предлагаете денег”;D

IFD>=S THEN PRINT “Ваша сдача”;

D-S; “руб”:GOTO m3

PRINT “Ваших денег не достаточно”: GOTO 4

m3: PRINT “Спасибо за покупку”

m2: PRINT “До свидания”

m4: PRINT “Приходите еще” Enter

Домашнее задание:

на «3»:

AND OR

«и» «или»

3≤ m <5

M < 5 AND m > = 3

на «4» «Решение квадратного уравнения» ax+bx+c=0 да D=b2 – 4ac нет да нет х=- нет да

REM INPUT “введи b и c” m1: INPUT “введите a” ;a IF a=0 THEM GOTO m1 ELSE D=b^2 – 4*4*A*c IF D<0 THEN PRINT “нет решений” ELSE GOTO m2 GOTO m3 m2: IF D=0 THEN LET x=-b\(2*a) ELSE GOTO m4 PRINT “x=”; x GOTO m3 m4: LET x1= LET x2= PRINT “Корни уравнения: x1=”x1;”, x2=”;x2 m3 END