Предмет: Информатика,
автор: Egor101
Запишите на языке Паскаль программу, которая по номеру для недели будет выводить его название.
Ответы
Автор ответа:
0
Var
n:byte;
begin
write('Vvedite nomer dnya nedeli: ');
readln(n);
case n of
1:writeln('Ponedelnik');
2:writeln('Vtornik');
3:writeln('Sreda');
4:writeln('Chetverg');
5:writeln('Pyatnica');
6:writeln('Subbota');
7:writeln('Voskresene');
else writeln('Net takogo dny');
end;
write('Dly vihoda nagmite Enter');
readln;
end.
Интересные вопросы
Предмет: Русский язык,
автор: asemamukanova2
Предмет: Математика,
автор: Daniel20O
Предмет: Математика,
автор: serikdaul008
Предмет: Химия,
автор: 8Диди
Предмет: Алгебра,
автор: ЮЛЯШКА12