Предмет: Информатика,
автор: volodarvelikodnij
Пожалуйста помогите! Объясните как исправить эту ошибку!
Приложения:
Ответы
Автор ответа:
1
Ответ:
1..5: Writeln (n,'...');
volodarvelikodnij:
Не помогло
Я уже понял, что можно просто через запятую написать 1,2,3,4,5
Странно у меня в таком виде пашет:
Program week;
Var n: integer;
begin
Writeln ('введіть номер дня тижня');
ReadLn (n);
Case n of
1..5: WriteLn (n,' - робочий день');
6,7: WriteLn(n,' - вихідний день')
else WriteLn ('нет');
end
end.
Var n: integer;
begin
Writeln ('введіть номер дня тижня');
ReadLn (n);
Case n of
1..5: WriteLn (n,' - робочий день');
6,7: WriteLn(n,' - вихідний день')
else WriteLn ('нет');
end
end.
А в чём запускаете?
Среда программирования "Алго"
Похожие вопросы
Предмет: Русский язык,
автор: karius
Предмет: Русский язык,
автор: stella140182
Предмет: Русский язык,
автор: odinokov1980
Предмет: Обществознание,
автор: mojseevich
Предмет: Математика,
автор: milk115