Написать текст программы ** языке Паскаль. Ввод и вывод данных в программе должны...

Question

Написать текст программы на языке Паскаль. Ввод и вывод данных в программе должны сопровождаться поясняющими сообщениями(например, “Введите радиус: ” и “Длина окружности = ”).В программе использовать стандартные функции.

---

Answer 1

Ответ:

Programm project1;

Var

X:integer;

Begin

Writeln ('введите число от 1 до5');

Readln(x);

Case (x)

Begin

1:writeln('деталь соответствующая списку : шуруп');

2:writeln('деталь соответствующая списку : гайка');

3:writeln('деталь соответствующая списку : винт');

4:writeln('деталь соответствующая списку : гвоздь');

5:writeln('деталь соответствующая списку : болт');

End;

End.

Comments

Лайк