Пожалуйста помогите! Объясните как исправить эту ошибку!. Created by volodarvelikodnij. informatika-ru

Пожалуйста помогите! Объясните как исправить эту ошибку!...

volodarvelikodnij @volodarvelikodnij

September 2021 1 12 Report

Пожалуйста помогите! Объясните как исправить эту ошибку!

Answers & Comments

tyngpuk

Ответ:

1..5: Writeln (n,'...');

1 votes Thanks 1

volodarvelikodnij Не помогло

volodarvelikodnij Я уже понял, что можно просто через запятую написать 1,2,3,4,5

tyngpuk Странно у меня в таком виде пашет:

tyngpuk Program week;
Var n: integer;
begin
Writeln ('введіть номер дня тижня');
ReadLn (n);
Case n of
1..5: WriteLn (n,' - робочий день');
6,7: WriteLn(n,' - вихідний день')
else WriteLn ('нет');
end
end.

tyngpuk А в чём запускаете?

volodarvelikodnij Среда программирования "Алго"

Answers & Comments

100 243

100 9 645dbc17a138f

100 12 6459cde43528e

dopomozhit bud laska dayu 100 b rozvyazati 456 zavdannya pershoyi chastini du

dopomozhit bud laska dayu 100 btreba zrobiti 23791011

pomogite pozhalujsta srochno reshit 456 uravnenie

dopomozhit bud laska 306 znajdit vidokremleni oznachennya i vidilit yih parni

napisati strukturni formuli spoluk

dopomozhit dayu 15 ballivzapitannya 1ich komme aus ukraine1der 2die 3

dopomozhit pzh duzhe trebaa9b04febb9d978438e3ffc653c863872 28217

рекомендуемые вопросы

Helpful Links

Helpful Social