Как в Паскале написать натуральное число в диапазоне от 0 до 6?
От 1 до 5 1,2,3,4,5 вот так
Beginvar n:=readlninteger;case n of0:println('Sunnuntai');1:println('Maanantai');2:println('Tiistai');3:println('Keskiviikko');4:println('Torstai');5:println('Perjantai');6:println('Lauantai');else print('Virne');end;end.