Надо создать программу в Pascal, помогите пожалуйста, срочно!!! Вести первую букву геометрической фигуры (ш, к, п). Напечатать название этой фигуры (шар, куб, призма)
Надо создать программу в Pascal, помогите пожалуйста, срочно!!!
Вести первую букву геометрической фигуры (ш, к, п). Напечатать название этой фигуры (шар, куб, призма)
Гость
Ответ(ы) на вопрос:
Гостьvar
c: char;
begin
read(c);
case c of
'ш': write('шар');
'к': write('куб');
'п': write('призма');
end;
end.
Не нашли ответ?
Похожие вопросы