Const n = 12; const k = 0; var temp : array [1..n] of integer; i, min, max, count : integer; begin min : = 1000; max : = -1000; count : = 0; {заполнение массива данными} for i : = 1 to n do begin write(i,'-й месяц: '); readln(temp[i]); if (temp[i] > max) then max : = temp[i]; if (temp[i] < min) then min : = temp[i]; {если температура выше k - месяц считается теплым} if (temp[i] > k) then count : = count + 1; end; writeln('минимальная температура: ',min); writeln('максимальная температура: ',max); writeln('количество теплых месяцев: ',count); readln; end.
Алиференко_Елена342
04.09.2022
Var i,j,k,ix,jx,kx: integer; s: string; function per(x: integer): string; begin case x of 10: result: ='a'; 11: result: ='b'; 12: result: ='c'; 13: result: ='d'; 14: result: ='e'; 15: result: ='f'; else str(x,result); end; end; begin for i: =1 to 15 do for j: =0 to 15 do for k: =0 to 15 do if 2*(i*16*16+j*16+k)=j*16*16+k*16+i then begin ix: =i; jx: =j; kx: =k; end; s: =per(ix)+per(jx)+per(kx); writeln(s); end. в результате работы программы получаем ответ.ответ: 6db
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Разгадайте кроссворд виды информации по форме представления