// PascalABC.NET 3.0, сборка 1164 от 11.02.2016 function gcd(a,b:integer):integer; // Нахождение НОД var i: longint; begin while b <> 0 do begin a := a mod b; i := b; b := a; a := i end; Result:=a end;
begin var a:=ReadInteger('a='); var b:=ReadInteger('b='); var nod:=gcd(a,b); if nod>1 then WritelnFormat('Дробь сократима: {0}/{1}={2}/{3}', a,b,a div nod,b div nod) else WritelnFormat('Дробь {0}/{1} несократима',a,b) end.
Российская государственная детская библиотека http://www.rgdb.ru РГДБ является научно-методическим и исследовательским центром в области педагогики, психологии и социологии детского чтения, библиографии детской литературы, организации библиотечного обслуживания детского населения. На сайте представлена коллекция интересных ссылок по тематическим рубрикам: «Литературные ресурсы», «Детские ресурсы», «Ресурсы для родителей», «Сайты писателей», «Интересные сайты», «Детские библиотеки», «Информация для библиотек». Возможен поиск в электронном каталоге. Другие образовательные ресурсы Федеральные образовательные порталы Российское образование http://www.edu.ru Портал создан в рамках Федеральной целевой программы: «Развитие единой образовательной информационной среды». Ориентирует в образовательном пространстве российской части Интернет. Содержит информационные, аналитические и статистические материалы обо всех ступенях и направлениях российского образования, государственные образовательные стандарты, информацию о конференциях, выставках, конкурсах, благотворительных фондах. Особую ценность представляет многоуровневый каталог образовательных Интернет-ресурсов. Российский общеобразовательный портал http://www.school.edu.ru Портал посвящен всем ступеням среднего образования. Содержит материалы по педагогике, в т.ч. коррекционной педагогике и специальной психологии. Кроме обширного каталога ссылок на образовательные ресурсы, здесь есть тематические коллекции методических материалов по различным учебным дисциплинам (диктанты по русскому языку, естественнонаучные эксперименты и пр.) Портал содержит справочную информацию об организации системы образования в различных регионах России. Естественно-научный образовательный портал http://www.en.edu.ru Портал содержит материалы и ссылки на ресурсы Интернет по естественно-научным дисциплинам. Поиск материала возможен по предмету (физика, химия, биология, математика), типу материала (справочники, задачники, лабораторные практикумы, учебники и др.), уровню образования (общее, высшее), характеру аудитории: (преподаватели, учащиеся, студенты). Специализированный портал «Здоровье и образование» http://www.valeo.edu.ru Нормативно-правовая часть сайта содержит законодательные и регламентирующие документы по охране здоровью учащихся. «Библиотека» содержит учебные программы, учебно-методическую литературу по формированию навыков здорового образа жизни, авторефераты диссертаций, монографии, статьи. Есть полнотекстовая версия журнала «Валеология». Социально-гуманитарное и политологическое образование http://www.law.edu.ru Портал содержит каталог ссылок и коллекции ресурсов по истории, философии, психологии, политологи, международным отношениям. Среди представленных материалов: учебники и учебные планы, методические рекомендации, курсы лекций, периодические издания, иллюстративный материал, – для преподавателей и учащихся дошкольной, начальной и средней степеней образования. Федеральный портал по дополнительному образованию детей http://www.vidod.edu.ru Портал содержит сведения о федеральных учреждениях дополнительного образования, нормативные документы, сведения о федеральных и межведомственных программах. Есть коллекция научно-методических материалов по организации системы, педагогике и менеджменту дополнительного образования, коллекция работ детей в области художественного, научно-технического и других направлений творчества. Специальный раздел посвящен детскому оздоровительному отдыху. Портал содержит каталог ссылок на ресурсы Интернет. Портал информационной поддержки Единого государственного экзамена http://ege.edu.ru/PortalWeb/index.isp Портал содержит демоверсии тестов, результаты тестирования, нормативные документы, материалы совещаний и конференций, посвященных тестированию, коллекцию публикаций по данной теме из периодических изданий. Есть большой раздел «Вопросы и ответы».
function gcd(a,b:integer):integer;
// Нахождение НОД
var
i: longint;
begin
while b <> 0 do begin
a := a mod b;
i := b; b := a; a := i
end;
Result:=a
end;
begin
var a:=ReadInteger('a=');
var b:=ReadInteger('b=');
var nod:=gcd(a,b);
if nod>1 then
WritelnFormat('Дробь сократима: {0}/{1}={2}/{3}',
a,b,a div nod,b div nod)
else WritelnFormat('Дробь {0}/{1} несократима',a,b)
end.
Тестовое решение:
a= 23541
b= 335160
Дробь сократима: 23541/335160=59/840