For i: =10 to 99 do if (i=(i div 10 + i mod 10) *3) then writeln(i);
Спасибо
Ответ дал: Гость
program nm13; uses crt; var s1,s2,d,a,diag: real; beginwriteln('vvedi ploschad kruga i ploschad kvadrata'); readln(s1); readln(s2); d: =2*sqrt(s1/3.14); a: =sqrt(s2); diag: =2*sqrt(2*a*a); if diag> d then writeln (' krug pomestits9 v kvadrate ') else writeln (' krug ne pomestits9 v kvadrate ');
readln;
end.
Ответ дал: Гость
первый файл займет 2750/1054 =2,6 = 3 кластера(может быть только целое число кластеров).
второй файл займет 324000/1024 = 307,4 = 308 кластеров.
Популярные вопросы