через паскаль

1 ввести 3 числа, вывести наименьшее

2 ввести номер месяца, вывести название месяца

3 ввести 5 чисел, вывести в порядке убывания

Question

Информатика

Настя

18 февраля, 19:22

через паскаль

1 ввести 3 числа, вывести наименьшее

2 ввести номер месяца, вывести название месяца

3 ввести 5 чисел, вывести в порядке убывания

+2

Ответы (1)

Знаете ответ на вопрос?

Ирина · Answer 1

program dz2;

uses crt;

var x: integer;

begin

write ('введите номер месяца') ;

read (x) ;

if (x>=3) and (x<=5) then

write ('весна') ;

if (x>=6) and (x<8) then

write ('лето') ;

if (x>=9) and (x<=11) then

write ('осень') ;

if (x=12) or (x<=2) then

write ('зима') ;

end.

через паскаль1 ввести 3 числа, вывести наименьшее2 ввести номер месяца, вывести название месяца3 ввести 5 чисел, вывести в порядке убывания

через паскаль

1 ввести 3 числа, вывести наименьшее

2 ввести номер месяца, вывести название месяца

3 ввести 5 чисел, вывести в порядке убывания