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

Кириджа114 Кириджа114    3   25.04.2020 01:09    4

Ответы
MrLech MrLech  13.10.2020 20:44

uses crt;

var detal:integer;

begin

writeln('Введите номер детали в списке');

read(detal);

case detal of

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

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

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

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

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

else writeln('детали под таким номером нет в списке');

end

end.

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика