| Автор |
Сообщение |
![[Post]](/NForum/images/icon_minipost.gif)
28.03.2016 15:01:18
Тема: Re:Информатика в 1 классе 2015-2016
|
Ольга Савицкая
Темы: 57
Сообщений: 3243
Мой профиль
|
1 А класс, 28 марта, понедельник (13 чел)
Результаты:
Встроенные функции и процедуры (377):
Функция Copy
4 Коновал Костя Официальные олимпиады\Школа, 10 марта 2010, 1 - 3 кл\ВФИП177 - "Задача 9"
Число (397):
Подводящие задания
4 Дрозд Никита 11 - "Podv_10 (new)"
Учим слова (медленно) (153):
По рисунку написать английское слово
2 Бабич Арсений PROGRAM - END\Перевод: PROGRAM - WRITELN\41 - "По русскому пишем английское слово (вразброс)"
Учимся думать 2012 (620):
Учимся думать 2011 - 4
9 Карпов Дмитрий Аналогия-2\1х3\497 - "Аналогия (L2 / L1 / L3)"
8 Барабанов Ярослав Синтез\Танграм. Мозайка\Мозайка 4\463 - "С. Самолеты (появл. 3х4)"
Учимся думать 2011 - 3
21 Картавицкая Дарья Импликация\325 - "Что такое хорошо, что такое плохо - 3"
5 Кожедуб Даниил Синтез\Танграм. Мозайка\Мозайка 1\253 - "Л.Мульт (появление,3х4)"
2 Буров Арсений Синтез\Танграм. Мозайка\6. Фигурист\250 - "Фигурист"
6 Афанаськова Арина Синтез\Танграм. Мозайка\3. Кот\247 - "Кот"
19 Блоцкий Алексей Синтез\Танграм. Мозайка\2. Кролик\246 - "Кролик "
10 Дивоченко Мария Сравнение предметов\Найдите фигуру (таны)\208 - "Найдите фигуру-1"
8 Князева Кира Позиционирование\Позиция\203 - "5x5 сп"
21 Дивоченко Полина Позиционирование\Позиция\195 - "4х4 сл"
|
28.03.2016 15:02:04
Тема: Re:Информатика в 1 классе 2015-2016
|
Ольга Савицкая
Темы: 57
Сообщений: 3243
Мой профиль
|
1 Б класс, 28 марта, понедельник (13 чел)
Результаты:
Число (397):
Ввод и форматированный вывод
2 Степченков Тимур Учимся думать - 2\Программы\Аналогия\Ч223 - "а_s[L] (L)"
Учим слова (медленно) (153):
По рисунку написать английское слово
1 Янчик Тимофей PROGRAM - END\Перевод: PROGRAM - WRITELN\40 - "program, var, longint, begin, readln, writeln"
Учимся думать 2012 (620):
Учимся думать 2011 - 4
13 Конишевская Карина Аналогия-2\2х2\НП\1 - "2x2 сл"
6 Медведева Дарья Аналогия-2\1х3\497 - "Аналогия (L2 / L1 / L3)"
3 Веремеенко Павел Аналогия-2\1х3\2, 3, 1\493 - "Кун-фу панда"
8 Авдеев Дмитрий Синтез\Танграм. Мозайка\Мозайка 5\471 - "Корабли (исч.,3х4)"
Учимся думать 2011 - 3
30 Лобунова Виктория Абстракция\5. Геометрические формы\309 - "Геометрические формы - 5"
19 Ковалькова Софья Анализ\292 - "Цвета - 5"
5 Димитров Артем Синтез\Танграм. Мозайка\11. Чернильница\258 - "Чернильница"
2 Богданова Анастасия Синтез\Танграм. Мозайка\11. Чернильница\258 - "Чернильница"
7 Евпак Егор Синтез\Танграм. Мозайка\10. Церковь\257 - "Церковь "
3 Иорх Ксения Синтез\Танграм. Мозайка\10. Церковь\257 - "Церковь "
13 Березовская Анастасия Позиционирование\Раскрась по образцу\207 - "Собери машину"
Техминимум. Танграм. Часть 2 (142):
Геометрические фигуры из др. фигур
17 Иорх Ксения 55 - "треугольник4. Перевернут (сложно2)"
|
28.03.2016 15:04:16
Тема: Re:Информатика в 1 классе 2015-2016
|
Ольга Савицкая
Темы: 57
Сообщений: 3243
Мой профиль
|
1 В класс, 28 марта, понедельник (13 чел)
Результаты:
Учимся думать 2012 (620):
Учимся думать 2011 - 4
8 Горовой Глеб Синтез\Танграм. Мозайка\29. Геометрические фигуры (дифференцировано)\НП\9 - "Trap_3"
Учимся думать 2011 - 3
25 Захаренко Даниил Учимся считать\Простая арифметика\371 - "Сумма1(1-5)"
18 Давыденко Василиса Учимся считать\Упорядочивание цифр\370 - "Переворот"
54 Мельникова Анна Учимся считать\Сопоставление цифр\Сопоставление всех цифр\352 - "Проверка (все цифры)"
7 Массалова Полина Синтез\Танграм. Мозайка\9. Корона\256 - "Корона"
1 Ионина Софья Синтез\Танграм. Мозайка\7. Парусник\254 - "Парусник"
3 Касьян Вероника Синтез\Танграм. Мозайка\Мозайка 1\253 - "Л.Мульт (появление,3х4)"
8 Киселевская Анастасия Синтез\Танграм. Мозайка\4. Отдыхающий\248 - "Отдыхающий"
17 Бурцева Диана Синтез\Танграм. Мозайка\3. Кот\247 - "Кот"
18 Дроздова Дарья Сравнение\Найди отличия\238 - "Рыбки"
9 Гуров Егор Сравнение\Найди отличия\236 - "Орлы"
Учимся думать 2011 - 2
3 Маненков Артем Синтез\Компоненты танграма\НП\103_1_1 - "2 треугольника - подв"
1 Асмоловская Надежда Сравнение\Найди отличия\96 - "Сцена"
Техминимум. Танграм. Часть 1 (64):
1 треугольник
11 Маненков Артем 12 - "С полным комплектом - 5"
|
31.03.2016 16:01:45
Тема: Re:Информатика в 1 классе 2015-2016
|
Александр Иванов
Темы: 17
Сообщений: 50
Мой профиль
|
Михаил Семенович, Ольга Александровна,
вот задача в одномерном массиве:
Звездочет целую неделю наблюдал за небосклоном в свой новый телескоп. В понедельник он насчитал s1 звезд, во вторую ночь – s2 звезд, …, в воскресенье – s7 звезд. Выведите дни (Monday, Tuesday, Wednesday, Thursday, Friday, Saturday, Sunday), в которые он увидел больше всего звезд.
Не знаю как записать переменную, чтобы она подставляла любой день.
Вот мое решение:
var
a : array [1..7] of longint;
i,max,k : longint;
begin
for i:=1 to 7 do readln(a[i]);
max:=a[1]; k:=1;
for i:=2 to 7 do if a[i]>max then begin max:=a[i]; k:=i; end;
for i:=1 to 7 do
if k=1 then writeln('monday');
if k=2 then writeln('tuesday');
if k=3 then writeln('wensday');
if k=4 then writeln('thursday');
if k=5 then writeln('friday');
if k=6 then writeln('saturday');
if k=7 then writeln('sunday');
end.
______________________
С уважением Александр Иванов.
|
31.03.2016 16:15:54
Тема: Re:Информатика в 1 классе 2015-2016
|
Ольга Савицкая
Темы: 57
Сообщений: 3243
Мой профиль
|
Александр Иванов:
Михаил Семенович, Ольга Александровна,
вот задача в одномерном массиве:
Звездочет целую неделю наблюдал за небосклоном в свой новый телескоп. В понедельник он насчитал s1 звезд, во вторую ночь – s2 звезд, …, в воскресенье – s7 звезд. Выведите дни (Monday, Tuesday, Wednesday, Thursday, Friday, Saturday, Sunday), в которые он увидел больше всего звезд.
Не знаю как записать переменную, чтобы она подставляла любой день.
После того, как ты нашел максимум, тебе необходимо найти все числа, которые будут равны 16 (твоему максимуму). Т.е. написать
if a[i]=max then
|
01.04.2016 11:38:46
Тема: Re:Информатика в 1 классе 2015-2016
|
Александр Иванов
Темы: 17
Сообщений: 50
Мой профиль
|
Ольга Александровна, спасибо
вы так имели в виду?
var
a : array [1..7] of longint;
i,max : longint;
begin
for i:=1 to 7 do readln(a[i]);
max:=a[1];
i:=1;
for i:=2 to 7 do
if a[i]>max
then begin max:=a[i]; end;
for i:=1 to 7 do
if a[i]=max
then begin
if max=1 then writeln('monday');
if max=2 then writeln('tuesday');
if max=3 then writeln('wensday');
if max=4 then writeln('thursday');
if max=5 then writeln('friday');
if max=6 then writeln('saturday');
if max=7 then writeln('sunday');
end;
end.
но я еще не до конца разобрался.
______________________
С уважением Александр Иванов.
|
01.04.2016 14:45:47
Тема: Re:Информатика в 1 классе 2015-2016
|
Александр Иванов
Темы: 17
Сообщений: 50
Мой профиль
|
Ольга Александровна, спасибо я разобрался.
______________________
С уважением Александр Иванов.
|
01.04.2016 17:15:48
Тема: Re:Информатика в 1 классе 2015-2016
|
Александр Иванов
Темы: 17
Сообщений: 50
Мой профиль
|
Ольга Александровна, Михаил Семенович,
простите пожалуйста что беспокою,
у меня новая задача в одномерном массиве:
Неопытный программист написал программу, которая на место первой пятерки заносила ноль, так как знал, что среди чисел до пятерки не было нулей. Напишите программу, которая бы возвращала набор чисел в исходное состояние, и выведите его.
вот мое решение:
var
c : char;
a,i,n,d : longint;
begin
readln(n);
for i:=1 to n do readln(a);
d:=a;
i:=1;
for i:=1 to n do
if a=0 then i:=5;
writeln(a);
end.
Я не очень понимаю что нужно сделать в этой задаче.
______________________
С уважением Александр Иванов.
|
02.04.2016 05:17:59
Тема: Re:Информатика в 1 классе 2015-2016
|
Михаил Долинский
Темы: 2072
Сообщений: 49900
Мой профиль
|
Александр Иванов:
Ольга Александровна, Михаил Семенович,
простите пожалуйста что беспокою,
у меня новая задача в одномерном массиве:
Неопытный программист написал программу, которая на место первой пятерки заносила ноль, так как знал, что среди чисел до пятерки не было нулей. Напишите программу, которая бы возвращала набор чисел в исходное состояние, и выведите его.
вот мое решение:
var
c : char;
a,i,n,d : longint;
begin
readln(n);
for i:=1 to n do readln(a);
d:=a;
i:=1;
for i:=1 to n do
if a=0 then i:=5;
writeln(a);
end.
Я не очень понимаю что нужно сделать в этой задаче.
Сначала давай о коде, который ты написал
readln(n);
for i:=1 to n do readln(a);
Ты читаешь n чисел в одну переменную - в результате теряешь все числа, кроме последнего.
Надо считывать в массив a[i]
d:=a;
Переменную d ты потом нигде не используешь - значит, эта строчка лишняя.
i:=1;
for i:=1 to n do
В операторе for i автоматически получит все значения от 1 до n
Поэтому строчка i:=1 тоже бесполезная
for i:=1 to n do
if a=0 then i:=5;
Ты n раз проверяешь равна ли 0 переменная a - это бессмысленная работа.
А если равна - пытаешься менять переменную цикла i.
Этого вообще нельзя делать никогда.
Теперь о том, что нужно сделать в задаче.
Надо найти первый ноль и занести в него пятёрку.
Вводим одномерный массив из n чисел
Чтобы найти первый ноль - используем стандартный поиск 0 в n числах.
Вместо оператора if (известно, что ноль там точно будет, и мы его найдём на позиции i)
пишем
a[i]:=5;
И затем выводим одномерный массив:
for i:=1 to n do writeln(a[i]);
|
03.04.2016 10:20:11
Тема: Re:Информатика в 1 классе 2015-2016
|
Александр Иванов
Темы: 17
Сообщений: 50
Мой профиль
|
Михаил Семенович, спасибо за помощь,
но у меня новая задача:
Федя решил, что будет решать только задачи, у которых максимальный балл на олимпиаде. Сколько он может получить баллов, и, в скобочках, сколько всего баллов за олимпиаду?
я понимаю что мне нужно сделать: если максимальное одно то тогда выводим максимальное и количество если иначе то тогда сначала складываем а затем выводим максимальное и количество
вот мое решение:
var
a : array [1..20] of longint;
i,n,max,k,m : longint;
begin
readln(n);
for i:=1 to n do readln(a[i]);
max:=a[1];
k:=0;
i:=1;
m:=0;
for i:=2 to n do
if a[i]>max then max:=a[i];
for i:=1 to n do m:=max+a[i];
for i:=1 to n do k:=k+a[i];
while (i<=n) and (a[i]<>max) do i:=i+1;
if i>n
then writeln(max,' (',k,')')
else writeln(m,' (',k,')');
end.
помогите пожалуйста.
______________________
С уважением Александр Иванов.
|
03.04.2016 13:44:46
Тема: Re:Информатика в 1 классе 2015-2016
|
Михаил Долинский
Темы: 2072
Сообщений: 49900
Мой профиль
|
Сначала замечания по коду
max:=a[1];
k:=0;
i:=1;
m:=0;
for i:=2 to n do
if a[i]>max then max:=a[i];
Нужно было найти максимальный
И эти операторы
k:=0;
i:=1;
m:=0;
лишние в этом месте
Далее нужно было найти сумму всех баллов
Ты правильно нашёл эту сумму в переменную k.
Только k:=0 нужно было написать непосредственно перед циклом
Далее нужно было сложить максимальные
m:=0
Для всех элементов
if a[i]=max then m:=m+max;
и потом вывод без всяких if
P.S. И всё-таки Саша лучше (и для меня, и для тебя) устно эти проблемы обсуждать.
|
11.04.2016 15:11:51
Тема: Re:Информатика в 1 классе 2015-2016
|
Ольга Савицкая
Темы: 57
Сообщений: 3243
Мой профиль
|
1 А класс, 11 апреля, понедельник (12 чел)
Результаты:
Встроенные функции и процедуры (377):
Функция Copy
1 Коновал Костя Официальные олимпиады\Город, 15 ноября 2014, 1-4 кл\ВФИП243 - "Задача 9"
Число (397):
о_L
1 Дрозд Никита L / L\НП\6 - "Задание2.1.1"
Подводящие задания
9 Бабич Арсений 10 - "podv_9"
Учимся думать 2012 (620):
Учимся думать 2011 - 4
17 Карпов Дмитрий Аналогия-2\521 - "3х3 - 6"
Учимся думать 2011 - 3
24 Картавицкая Дарья Учимся считать\Простая арифметика\381 - "Разность2(1-5)"
10 Афанаськова Арина Учимся считать\Простая арифметика\379 - "Разность1(1-5)"
22 Князева Кира Отрицание\Собачка\НП\314_1 - "Укажи части рисунка"
23 Грапов Ярослав Запоминание\Танграм\284 - "Шалаш с таймером"
17 Кожедуб Даниил Синтез\Сложи фрукты\275 - "Цветы"
3 Блоцкий Алексей Синтез\Танграм. Мозайка\5. Навеселе\249 - "Навеселе"
14 Дивоченко Мария Упорядочивание\241 - "Перестановка цифр"
9 Дивоченко Полина Сравнение предметов\Разное\217 - "Найти 3 картинки"
|
11.04.2016 15:23:10
Тема: Re:Информатика в 1 классе 2015-2016
|
Ольга Савицкая
Темы: 57
Сообщений: 3243
Мой профиль
|
1 Б класс, 11 апреля, понедельник (11 чел)
Результаты:
Число (397):
Ввод и форматированный вывод
7 Степченков Тимур Учимся думать - 2\Программы\Абстракция\235 - "Программа маленькими буквами: L1L2L3"
Учим слова (медленно) (153):
По рисунку написать английское слово
61 Конишевская Карина PROGRAM - END\27 - "По русскому пишем английское слово (вразброс)"
Пропедевтика слов (207):
Набрать по образцу
16 Ларионова Вероника 15 - "PROGRAM (обучение) - 7"
Учимся думать 2012 (620):
2 Ларионова Вероника 17:28:08 (620)
Учимся думать 2011 - 5
11 Веремеенко Павел Линии в танграме\569 - "Обучение разрезанию"
8 Медведева Дарья Синтез\Мозайка 7\556 - "С.Русалочка (5х3)"
11 Иорх Ксения Структуризация\Стартовая расстановка шахмат\532 - "Расстановка(ладья)"
Учимся думать 2011 - 4
10 Исаев Артем Синтез\Танграм. Мозайка\52. Коттедж - двойной\476 - "Коттедж.Двойной"
6 Евпак Егор Синтез\Танграм. Мозайка\Мозайка 5\470 - "Л. Красивые (появл. 4х3)"
1 Богданова Анастасия Синтез\Танграм. Мозайка\30. Квадрат\442 - "Квадрат"
Учимся думать 2011 - 3
12 Березовская Анастасия Синтез\Танграм. Мозайка\6. Фигурист\НП\1 - "Фиругист подводящие"
Учимся думать 2011 - 2
11 Иваненко Максим Синтез\Компоненты танграма\НП\1 - "Шалаш с подсказкой"
|
11.04.2016 15:23:56
Тема: Re:Информатика в 1 классе 2015-2016
|
Ольга Савицкая
Темы: 57
Сообщений: 3243
Мой профиль
|
1 В класс, 11 апреля, понедельник (12 чел)
Результаты:
Учимся думать 2012 (620):
Учимся думать 2011 - 4
6 Давыденко Василиса Синтез\Танграм. Мозайка\Мозайка 5\472 - "Питомцы (нов.л. исч.4х3)"
49 Захаренко Даниил Синтез\Танграм. Мозайка\Мозайка 2\447 - "Л. Спорт (нов.л. появл. 3х4)"
3 Горовой Глеб Синтез\Танграм. Мозайка\Мозайка 2\446 - "Л.Космос (появление,2х2)"
Учимся думать 2011 - 3
31 Киселевская Анастасия Учимся считать\Упорядочивание цифр\370 - "Переворот"
15 Касьян Вероника Синтез\273 - "Сложи фрукты"
3 Массалова Полина Синтез\Сложить картинку по образцу\261 - "Шахматы"
4 Ионина Софья Синтез\Сложить картинку по образцу\261 - "Шахматы"
6 Гуров Егор Синтез\Танграм. Мозайка\7. Парусник\254 - "Парусник"
6 Дроздова Дарья Синтез\Танграм. Мозайка\Мозайка 1\252 - "Смешарики (легко,4х3)"
3 Бурцева Диана Синтез\Танграм. Мозайка\Мозайка 1\251 - "Л. Разное (счезн. 2х2)"
Учимся думать 2011 - 2
2 Маненков Артем Синтез\Компоненты танграма\НП\5 - "Шалаш"
15 Асмоловская Надежда Синтез\Компоненты танграма\111 - "Собака"
Техминимум. Танграм. Часть 1 (64):
8 Маненков Артем 00:57:32 (64)
|
10.05.2016 12:35:19
Тема: Re:Информатика в 1 классе 2015-2016
|
Михаил Долинский
Темы: 2072
Сообщений: 49900
Мой профиль
|
10.05.2016 11:25:58 10.05.2016 11:25:58 Коновал Костя Информатика 2015-2016 Одномерный массив 50 верный ответ Manual check ManualResult
10.05.2016 11:25:45 10.05.2016 11:25:52 Коновал Костя Информатика 2015-2016 к50. Задача 11 5 Все тесты успешно пройдены K.PAS DelTA3 at NIT6
10.05.2016 11:20:09 10.05.2016 11:20:18 Коновал Костя Информатика 2015-2016 ОМ49. Минимальный из n чисел с номером 5 Все тесты успешно пройдены K.PAS DelTA3 at NewIT
10.05.2016 11:02:26 10.05.2016 11:02:35 Коновал Костя Информатика 2015-2016 ОМ48. Минимальное из N чисел 5 Все тесты успешно пройдены K.PAS DelTA3 at NIT7
10.05.2016 11:00:36 10.05.2016 11:00:41 Коновал Костя Информатика 2015-2016 ОМ47. Минимальное из 10 чисел 5 Все тесты успешно пройдены K.PAS DelTA3 at NIT8
10.05.2016 10:47:16 10.05.2016 10:47:25 Коновал Костя Информатика 2015-2016 к46. Конфеты 5 Все тесты успешно пройдены K.PAS DelTA3 at NIT6
10.05.2016 10:38:57 10.05.2016 10:39:05 Коновал Костя Информатика 2015-2016 ОМ45. Задача 13 4 Все тесты успешно пройдены K.PAS DelTA3 at NIT6
10.05.2016 10:25:58 10.05.2016 10:27:31 Коновал Костя Информатика 2015-2016 к44. Задача 12 4 Все тесты успешно пройдены K.PAS DelTA3 at NIT6
10.05.2016 10:26:43 10.05.2016 10:27:31 Коновал Костя Информатика 2015-2016 к44. Задача 12 4 Все тесты успешно пройдены K.PAS DelTA3 at NIT5
10.05.2016 10:23:32 10.05.2016 10:27:19 Коновал Костя Информатика 2015-2016 к44. Задача 12 4 Все тесты успешно пройдены K.PAS DelTA3 at NewIT
Первоклассник в одномерном массиве уже почти все новые темы прошёл (только поиск остался).
Круто.
Молодец, Оля.
|
|
|
![[Logo]](/NForum/images/logo.gif){kind=logo}
![[DL]](/NForum/images/icon_mini_groups.gif){kind=icon}
На главную страницу
![[Up]](/NForum/images/icon_up.gif){kind=icon}
