вот такую херь я нарыл курсе "Компетенции преподавателя электронного обучения" "1. Насколько вас устроил уровень организации мероприятия? Устроил полностью. 2. Какие информационные блоки вы отметили бы особенно и почему? Зарубежный опыт организации ЭО, что это не дело рук одного преподавателя, а коллектива. 3. Какова практическая ценность полученных материалов? Метод знакомиться со студентами в ЭС, потому что не всегда хватает очных занятий для этого. 4. На какие проблемы стоит обратить внимание? Работа в группах при таком большом потоке слушателей сложна в организации, в результате идеи мы представляли, а обратной связи не было, поэтому это было больше развлечением, чем практически ценным. 5. Какие рекомендации и пожелания вы можете для нас оставить? Больше практики. И ИНЭО все таки закупить ПО для более качественного обеспечения работы преподавателя в ТПУ в ЭС, а не пользоваться бесплатными ресурсами интернета, накладывающими свои рекламные логотипы. ". А.В. Жаворонок, кафедра экономики, ассистент О курсе "Организация учебного процесса с использованием технологий электронного обучения по смешанной модели (на основе LMS Moodle и других инструментов и сервисов ЭО за совместную работу, в целом все было замечательно. По курсу Разработка электронного курса по дисциплине на базе LMS Moodle с использованием инструментов и сервисов электронного обучения все отлично, к координаторам можно было всегда подойти и уточнить возникшие во По второму курсу Организация учебного процесса с использованием технологий электронного обучения по смешанной модели (на основе LMS Moodle и других инструментов и сервисов ЭО) я столкнулась со странной стратегией - время вебинаров не совпадало с заявленным и начало вебинара не было прописано в календаре (было бы лучше указывать точное время вебинара в календаре, т.к. календарем пользуются) (и да, только первое началось в указанное время). Мне очень было жаль технарей, т.к. не все термины из педагогики/сетодики им были знакомы. Здесь нужно составить хотя бы мини-глоссарий с наиболее употребляемыми терминами из методики и педагогики (которые позднее будут использованы в презентациях). Эти моменты действительно были самыми запоминающимися, опять-таки, повторюсь, но организаторы курса практически сразу реагировали на сообщения, отвечали и оставляли комментарии по работе. (мне конечно же хотелось получать ответ сразу после моего выложенного, но здесь была своя система, вероятно, по причине большого количества курсантов). Мне кажется, был некоторый перегруз теорией и заданиями, особенно последние два - они были слишком энергозатратными. (Вот, цель 3 лекции не ясна - во к лекции нет, видимо, только лишь для ознакомления)... Данный курс повышения квалификации и нужный, и полезный, задания, необходимые для выполнения, заставляют мозг работать в усиленном режиме большое преподавателям, которые с нами работали и до нас пытались донести все значимое!" Н.В. Аксенова, кафедра иностранных языков института кибернетики, старший преподаватель .
Объяснение:
На PascalABC.NET можно так:
var k: array of string;
procedure CreatOrAdd(add: boolean);
begin
var i,n: integer;
write('введите кол-во учеников: ');
readln(n);
if (add) then
begin
setlength(k,k.Length+n);
for i:= 0 to n-1 do
begin
write('введите ФИО:');
readln(k[k.Length-n+i]);
end;
end
else
begin
setlength(k,n);
for i:= 0 to n-1 do
begin
write('введите ФИО:');
readln(k[i]);
end;
end;
end;
procedure out;
begin
try
writeln('Список класса:');
for var i:= 0 to k.Length-1 do writeln(k[i]);
except
on e: System.Exception do writeln(e.Message);
end;
end;
procedure menu;
begin
writeln('1, Создание списка класса');
writeln('2, Добавление');
writeln('3, Удаление');
writeln('4, Вывод списка класса');
writeln('5, EXIT');
end;
procedure delet;
begin
var n: integer;
write('введите номер удаляемого ученика: ');
readln(n);
try
if (n<=k.Length) then
k := k.Where(t -> t<>k[n-1]).ToArray()
else writeln('Ошибка');
except
on e: System.Exception do writeln(e.Message);
end;
end;
var
kom: byte;
begin
repeat
menu;
readln(kom);
case kom of
1: creatoradd(false);
2: creatoradd(true);
3: delet;
4: out;
5: exit;
end;
until kom = 5;
end.
Если будут вопросы, спрашивайте.