Разработать алгоритм программы(Паскаль)

@HappyEndDimka · Регистрация: 19.03.2013

Author24 — интернет-сервис помощи студентам

Разработать алгоритм программы, которая запрашивает у пользователя номер дня недели и выводит его название или сообщает "Ошибка ввода данных".(Разработка алгоритмов разветвляющейся структуры).

Новичок · 19.03.2013, 18:25

Pascal

uses crt;
var n:Integer;
begin
ClrScr;
Write('Введите номер дня недели: ');
Readln(n);
case n of
1:Writeln('Понедельник');
2:Writeln('Вторник');
3:Writeln('Среда');
4:Writeln('Четверг');
5:Writeln('Пятница');
6:Writeln('Суббота');
7:Writeln('Воскресенье');
else Writeln('Ошибка ввода данных');
end;
Readln;
end.

@HappyEndDimka · 19.03.2013, 18:29 **[ТС]**

Сообщение от Андрей_Новичок

Pascal

uses crt;
var n:Integer;
begin
ClrScr;
Write('Введите номер дня недели: ');
Readln(n);
case n of
1:Writeln('Понедельник');
2:Writeln('Вторник');
3:Writeln('Среда');
4:Writeln('Четверг');
5:Writeln('Пятница');
6:Writeln('Суббота');
7:Writeln('Воскресенье');
else Writeln('Ошибка ввода данных');
end;
Readln;
end.

Спасибо

@HappyEndDimka 0 / 0 / 2 Регистрация: 19.03.2013 Сообщений: 13
		1
	Разработать алгоритм программы(Паскаль) 19.03.2013, 18:03. Показов 1913. Ответов 2 Метки нет (Все метки) Разработать алгоритм программы, которая запрашивает у пользователя номер дня недели и выводит его название или сообщает "Ошибка ввода данных".(Разработка алгоритмов разветвляющейся структуры). 0

	19.03.2013, 18:29

Разработать алгоритм программы(Паскаль)

Решение