Можно код сделать покороче, если ты об этом.
program tri;
var
a, b, c: real;
begin
writeln('Введите a,b,c:');
readln(a, b, c);
if (a > 0) and (b > 0) and (c > 0) then
begin
if (a = c) and (b = c) and (a = b) then
writeln('Треугольник равносторонний') ;
if (((a = b) and (b <> c)) or
((b = c) and (b <> a)) or
((c = b) and (c <> a))) then
writeln('Треугольник равнобедренный');
if (a <> b) and (c <> b) and (a <> c) then
writeln('Треугольник произвольный') ;
end
else
writeln('такого треугольника нет') ;
end.
Ну вот, на 5 строчек короче, но смысл тот же.
Изменения:
Использовал if.. else вместо двух if при проверке положительности сторон. Собрал 3 if при проверке на равносторонность в один if.
В сегодняшнем мире очень сложно обладать всей информацией по преподаваемым предметам, даже имея большой опыт, эрудицию, начитанность.
В наше время учитель должен не только научить школьника учиться, но и воспитывать личность, ориентированную на саморазвитие. Успешно учиться и учить в современной школе электронные образовательные Интернет-ресурсы.
Самые эффективные электронные ресурсы – мультимедиаресурсы. В них учебные объекты представлены множеством различных с текста, графики, фото, видео, звука и анимации. Они представляют уникальную возможность для самостоятельной творческой и исследовательской деятельности учащихся.
Работая с учениками начальных классов, учитель в курсе изучения различных предметов встречается с разнообразными заданиями, которые нужно выполнить ученику с Интернета (подготовь сообщение, рассказ, рассказ-биографию, найди сведения о событии, памятной дате, о новых открытиях, соверши воображаемое путешествие в заповедник, музей и др.).
Проектная деятельность, которую мы осуществляем в рамках введения ФГОС, также требует от учеников умения пользоваться Интернет-ресурсами.
Ученик, который не усвоил материал или отсутствовал на уроке, может в сети Интернет найти ответы на свои вопросы: просмотреть презентацию, видео-урок, пройти тестирование.
С Интернет-ресурсов учитель может самостоятельно повысить свою квалификацию (например, с использованием дистанционного обучения), найти материалы в сети Интернет для проведения уроков (презентации, видеоролики, готовые разработки, задания, компьютерные обучающие программы, онлайн-тестирование, электронные учебники, интерактивные уроки и др.), получить информацию о новых педагогических технологиях, нормативных документах, конкурсах, опубликовать свои разработки, поучаствовать в вебинарах.
Интернет-ресурсы обеспечивают более тесную связь между школой и родителями учащихся. Это: сайты школы, учителей, электронные журналы, дневники, работа с электронной почтой.
Подводя итог можно отметить, что эффективность применения Интернет-ресурсов на уроках заключается в том, что
использование Интернет-ресурсов повышает информационную культуру учащихся;
появляется возможность использовать более обширную информацию на уроках;
обеспечивает оперативность пополнения учебного материала новыми сведениями;
уроки становятся более интересными, насыщенными, качественными, результативными;
обеспечивается объективность и независимость результатов ученика от мнения учителя;
повышается мотивация к обучению.
Применение Интернет технологий открывает перспективное направление в обучении, но необходимо соблюдать принцип «в нужном месте, в нужное время, в нужном объёме».
Begin
For i:=1 to 20 do Writeln(i,'^2 = ',sqr(i));
end.