Информатика, опубликовано 06.06.2020 21:03
Как можно создать модели в программе SketchUp?
Ответ оставил: Гость
Чертишь крест 10 на 10 ставишь через клеточку цифру в правую сторону 1 2 3 4 и так до десяти а в левую -1 -2 -3 -4 -5 -6 и так до 10 .потом верх пишешь 1 2 3 4 5 и так до 10 а в низ -1 -2 -3 -4 -5 и так до десяти и все делаешь потом координаты например 2, -3 значит в правую 2 клеточки и если - то 3 клетки вниз и соединяешь эти точки
Ответ оставил: Гость
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...ОтделыОбмен", Приём ИЗ "...ОтделыОбмен";
ПЕР
число, чётных, сумцифр, цифра: ЦЕЛ;
УКАЗ
число := Приём.Число();
чётных := 0; сумцифр := 0;
ПОКА число > 0 ВЫП
цифра := число ОСТАТОК 10;
ЕСЛИ ЧЕТ(цифра) ТО УВЕЛИЧИТЬ(чётных) КОН;
УВЕЛИЧИТЬ(сумцифр, цифра) КОН;
число := ЧИСЛО ДЕЛИТЬ 10
КОН;
Вывод.ЧЦел("^%d %d", чётных, сумцифр, 0, 0)
КОН Задание.
ИСПОЛЬЗУЕТ Вывод ИЗ "...ОтделыОбмен", Приём ИЗ "...ОтделыОбмен";
ПЕР
число, чётных, сумцифр, цифра: ЦЕЛ;
УКАЗ
число := Приём.Число();
чётных := 0; сумцифр := 0;
ПОКА число > 0 ВЫП
цифра := число ОСТАТОК 10;
ЕСЛИ ЧЕТ(цифра) ТО УВЕЛИЧИТЬ(чётных) КОН;
УВЕЛИЧИТЬ(сумцифр, цифра) КОН;
число := ЧИСЛО ДЕЛИТЬ 10
КОН;
Вывод.ЧЦел("^%d %d", чётных, сумцифр, 0, 0)
КОН Задание.
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01