Var i,a,b,c: integer; begin for i : = 10 to 99 do begin a: =i div 10; b: =i mod 10; c: = a*a+b*b; if c mod 13=0 then writeln(i); end; end.
Спасибо
Ответ дал: Гость
а)400*2,5=1000кб
б)64: 2,5=25,6=25(страниц)
в)нужен диск cd-r ,cd-rw
Ответ дал: Гость
а после 18 какое число идет? ? если 108 ,то тогда получается так 2*3=6, 3*6=18, 6*18=108,получается что первое число умножается на второе,второе на третье,третье на четверное и т.д
Популярные вопросы