Работы полностью)) / 6.4.1(#23) / Отчет

Отчет по работе 6.4.1 №23

Задание

Вычислить сумму кодов всех символов, которые в цикле вводятся с клавиатуры до нажатия на клавишу Esc(Изменено на пароль)

Код работы:

CLS

COLOR 10.7

Print "Parol: 1997"

INPUT "Chislo=", a

WHILE a <> 1997

o = o + a

INPUT "Chislo=", a

WEND

IF a = 1997 THEN

PRINT "Vveden parol"

PRINT "Summa vseh chisel=", o

END IF

Скриншот программы с ответом: