Сколько раз встречается минимальная цифра в записи введённого с клавиатуры 4-х значного числа? Помогите плиз!!
Сколько раз встречается минимальная цифра в записи введённого с клавиатуры 4-х значного числа? Помогите плиз!!
Гость
Ответ(ы) на вопрос:
ГостьProgram Pr1;
uses crt;
var mas:array[1..4] of integer;
stroka:string;
i,min,b:integer;
Begin
clrscr;
writeln('Vvedite chislo');
readln(stroka);
for i:=1 to 4 do val(stroka[i],mas[i],b);
min:=10;
b:=0;
for i:=1 to 4 do if mas[i]
Не нашли ответ?
Похожие вопросы