Официальный сайт teledu 24/7/365

Вы не зарегистрированы

Авторизация



Форум вопросов для участников дистанционного курса по обучению программирования в среде PascalABC

Ответов - 11
Ирина Александровна Волкова
Фото пользователя Ирина Александровна Волкова
На сайте с: 12/01/2009
Баллы: 2617
Пользователь в офф-лайн. Последнее посещение 4 years 39 недель назад.

 

Уважаемые коллеги!

Мы рады приветствовать Вас на дистанционном курсе "Подготовка к ЕГЭ: Основы программирования на языке Паскаль". Желаем Вам успешного обучения!

В случае, если у Вас возникнут вопросы по ходу обучения, Вы можете их задать на этом форуме. В вопросе указывайте номер задания, вызвавшего затруднение, и прикрепляйте файл, с которым вы работаете. 

Здесь же можно обсудить методические приемы преподавания различных тем программирования. 

Успехов! 

Леонид Исаевич Долинер
Фото пользователя Леонид Исаевич Долинер
На сайте с: 23/11/2010
Баллы: 71
Пользователь в офф-лайн. Последнее посещение 6 лет 38 недель назад.
На: Форум вопросов для участников дистанционного курса по обуче

Коллеги, добрый день! Напрягает то, что ни у кого не возникает вопросов. И очень мало лабораторных выполнено (судя по почте). Чего ждем?

Л.И. Долинер

Елена Николаевна Беляева
Фото пользователя Елена Николаевна Беляева
На сайте с: 31/03/2011
Баллы: 58
Пользователь в офф-лайн. Последнее посещение 6 лет 3 weeks назад.
На: Форум вопросов для участников дистанционного курса по обуче

Добрый день! У меня проблема: не смогла установить PascalABC.Net  на нетбук (32-разрядная Windows 7 Начальная), они совместимы? Может нужно найти другой установочный файл?

Надежда Геннадьевна Расскацикова
На сайте с: 17/02/2010
Баллы: 11
Пользователь в офф-лайн. Последнее посещение 6 лет 26 недель назад.
На: Форум вопросов для участников дистанционного курса по обуче

Здравствуйте, Елена Николаевна. У меня была такая же проблема. После обновления Windows и установки Microsoft.NET Framework 4 Extended всё заработало.

 

Н.Г. Расскацикова
Леонид Исаевич Долинер
Фото пользователя Леонид Исаевич Долинер
На сайте с: 23/11/2010
Баллы: 71
Пользователь в офф-лайн. Последнее посещение 6 лет 38 недель назад.
На: Форум вопросов для участников дистанционного курса по обуче

Елена Николаевна, добрый день! Как бы они совместимы. Вариант установки подсказала коллега. Вы просто не говорите, какое сообщение выдает среда после запуска. Что значит "не смогла установить"? Не устанавливается? Или не запускается? Если не устанавливается, что говорит? Если не запускается, какое сообщение выдает?

Л.И. Долинер

Анастасия Владимирвна Игнатьева
Фото пользователя Анастасия Владимирвна Игнатьева
На сайте с: 20/08/2009
Баллы: 35
Пользователь в офф-лайн. Последнее посещение 4 years 15 недель назад.
На: Форум вопросов для участников дистанционного курса по обуче

Решаю задачу из 9 лаборатной работы, где нужно построить забор. Что самое интересное, вроде все правильно прописываю по координатам, а в одном месте ошибка. Вот поглядите! Прикладываю код! Жду ваших комментов!

uses graphABC;
begin
setpencolor(clrandom);
setpenwidth(5);
setbrushcolor(clrandom);
var dl:=20;
var x:=100;
var y:=100;
for var i:=1 to 10 do
begin
 moveto(x,y);
lineto(x+50,y-50);
lineto(x+50,y-50);
 lineto(x-100,y);
 lineto(x,y-200);
 moveto(x+100,y);
end;
end.

Татьяна Позныш
Фото пользователя Татьяна Позныш
На сайте с: 15/12/2009
Баллы: 47
Пользователь в офф-лайн. Последнее посещение 6 лет 39 недель назад.
На: Форум вопросов для участников дистанционного курса по обуче

Анастасия Владимировна, доброго времени суток! В 9 лабе задача про забор не единственная. Да, что-то Ваши координаты пляшут. У Вас  две одинаковые строки и не задействована переменная dl. Посмотрите этот вариант:

uses GraphABC;

var x,y,k:integer;

begin

  x:=100;y:=100;

  for k:= 1 to 5 do

  begin

   MoveTo(x,y);

   LineTo(x-10,y+10);

   LineTo(x-10,y+100);

   LineTo(x+10,y+100);

   LineTo(x+10,y+10);

   LineTo(x,y);

   FloodFill(x,y+10,clRandom);

   x:=x+20;

   end;

end.

Есть ещё задача про забор, где запрашивается кол-во досок и длина забора. Удачи!

Анастасия Владимирвна Игнатьева
Фото пользователя Анастасия Владимирвна Игнатьева
На сайте с: 20/08/2009
Баллы: 35
Пользователь в офф-лайн. Последнее посещение 4 years 15 недель назад.
На: Форум вопросов для участников дистанционного курса по обуче

Спасибо! Попробую ваш вариант. А почему координаты пляшут, мне даже не понятно, пыталась разбираться, а гдето упускаю момент. Что не одна я в курсе, на одной застряла!

Леонид Исаевич Долинер
Фото пользователя Леонид Исаевич Долинер
На сайте с: 23/11/2010
Баллы: 71
Пользователь в офф-лайн. Последнее посещение 6 лет 38 недель назад.
На: Форум вопросов для участников дистанционного курса по обуче

 схема построения заборасхСхСхКоКр.

Добрый день, коллеги! Извините, что не ответил сразу. Как-то не могу привыкнуть, что PascalABC.Net стоит не на всех компьютерах в ИРО и УрФУ.

Я бы Вашу задачу попытался решить все же как-то более универсально. Вообще возьмите за привычку не использовать внутри текста программы константы. Они должны быть в блоке констант (исключение - когда константа используется не более 1 раза и программа небольшая. Если большая - значит в блок констант!).

uses graphABC;

begin

var a:=40; // ширина доски

var h:=200; // высота доски

var x:=100;

var y:=100;

// начинаем рисовать с верхнего угла доски

for var i:=1 to 10 do

begin

moveto(x,y);

lineto(x+a div 2,y + a div 2); // линия с вершины вправо под углом

lineto(x+a div 2,y + a div 2 + h); // линия вниз

lineto(x-a div 2,y + a div 2 + h); // низ доски

lineto(x-a div 2,y + a div 2); // левый бок доски

lineto(x,y); // вернулись в исходную точку

floodfill(x,y+5, clrandom); // закрасить внутреннюю область доски

x+=a; // новая координата вершины новой доски

end;

end.

Комментарий был изменен с момента создания (doliner, Fri, 12/10/2012 - 13:54).

Л.И. Долинер

Леонид Исаевич Долинер
Фото пользователя Леонид Исаевич Долинер
На сайте с: 23/11/2010
Баллы: 71
Пользователь в офф-лайн. Последнее посещение 6 лет 38 недель назад.
На: Форум вопросов для участников дистанционного курса по обуче

А координаты пляшут, поскольку вы повторяете все действия на одном месте - ведь после цикла ни одна переменная у вас не изменилась! Кроме того, похоже, есть проблемы с пониманием работы lineto. Фишка в том, что эта процедура рисует линию из текущей точки в точку, координаты которой указаны в параметрах процедуры. Следующая lineto рисует линию ИЗ НОВОЙ ТОЧКИ! См. пример.

Л.И. Долинер

Леонид Исаевич Долинер
Фото пользователя Леонид Исаевич Долинер
На сайте с: 23/11/2010
Баллы: 71
Пользователь в офф-лайн. Последнее посещение 6 лет 38 недель назад.
На: Форум вопросов для участников дистанционного курса по обуче

Коллеги, добрый день! Я напоминаю, что на след. неделе у нас с вами итоговое занятия в пт., 26 октября.

Ждем вас к 10:00 в ауд. 205.

Разумеется, должны быть сделаны лабораторные работы и выпускная работа.

Напоминаю, что выпускная работа должна демонстрировать ваш уровень подготовки по программированию и может включать:

1) программу, ориентированную на использование в учебном процессе. Это может быть, например, тренажер по информатике, обеспечивающий отработку умений при подготовке к ЕГЭ и т.п.

2) методическая разработка, ориентированная на урок информатики (в идеале - программирования), в рамках которого используются фрагменты или готовые программы на языке Паскаль.

Ждем вас.

Л.И. Долинер

Смотреть видео hd онлайн


Смотреть русское с разговорами видео

Online video HD

Видео скачать на телефон

Русские фильмы бесплатно

Full HD video online

Смотреть видео онлайн

Смотреть HD видео бесплатно

School смотреть онлайн