Регистрация
krasivak
18.05.2020 04:52
Информатика
Есть ответ 👍

)нужно написать код программы) суть программы: надо запросить с пользователя число и потом что бы он разложилось на части. ти по 251 , а получается 2_5_1.

256
260
Посмотреть ответы 2

Ответы на вопрос:

maxtihvin
maxtihvin
4,4(20 оценок)
Проще всего решается, если разрешено использовать строки: var a,i: integer; s: string; begin write('введите число = '); readln(a); str(a,s); for i: =1 to length(s)-1 do write(s[i],'_'); writeln(s[length(s)]); end.
tar02
tar02
4,5(76 оценок)

uses system; var ch,min,max,i: integer; begin cls;

readln(ch); min: =ch; max: =ch;

while(ch< > 0) dobegin readln(ch); if ((min > ch) and (ch< > 0)) then min: =ch; if max < ch then max: =ch; inc(i); if i > 999 then break; end;

writeln('max = ', max); writeln('min= ',min); writeln('suma max + min = ',max+min); readln; end.

Популярно: Информатика