ТутРешу.Ру

Какое значение примет К после выполения алгоритмаХ:…

Задание:

Какое значение примет К после выполения алгоритмаХ: =0: K: =5 выборпри x<5: K: =3 при x <= 0: K: =2 иначе K: =0 все Пожайлуста напишите программу. Мы сейчас проходим оператор case!

Решение:

Program Number1; Varx, k: integer; Beginwriteln (‘Введите x‘); readln (x); if (x<0) or (x>9) thenwriteln (‘Это число не является цифрой‘) elsecase x of1,2,3,4: k: =3; else: if (x <= 0) thenk: =2; elsek: =0; end; readln; End.




Знаете другой ответ?

Отправить свой ответ