Получите растровые коды и векторы описания для изображения букв "н","л","т" на черно-белом экране с графической сеткой размером 8x8

213

335

Посмотреть ответы 1

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

555767

Информатика

4,8(7 оценок)

//pascal abc.net 3.1 сборка 1219 var x,y,r: real; k,i,xi,yi: integer; begin readln(x,y); xi: =round(x-frac(x)); yi: =round(y-frac(y)); for i: =xi to yi do begin inc(k); r: =r+power(i,3); writeln(i); end; writeln('count=',k); writeln('sum=',r); end. пример ввода: -1.8 2.8 пример вывода: count=4 sum=8