30 БАЛЛОВ
Помогите решить два задания по информатике 10 класс.Написать надо на листке. язык: паскаль
1.Задать массив из 10-ти произвольных чисел. Найти сумму девятого и десятого элементов последовательности.
2.Массив А вводится с клавиатуры. Вывести массив А, в , котором положительные элементы возвести в квадрат.
Ответы
Ответ дал:
1
Ответ:
Дан во вложениях.
Приложения:
LRSM:
Какой смысл трижды объявлять цикл с одинаковыми параметрами? Лишняя работа, за такое могут и балл снизить.
Может быть и лишняя работа, но у нас за такое балл никогда не снижали
Либо писать 4 строки на 2 for'а, либо 5 строк на for с begin, двумя действиями и end. В рамках школьной программы вообще почти всегда без разницы ведь
Разница как минимум в скорости, в два раза.
Ваше побыстрее будет? Оно на вид тоже работает за три цикла
Если вам важно, чтобы решения с N=5e7 отрабатывали за секунду и быстрее, отметьте нарушение и попросите отправить на исправление, несложно ж объединить
Ваш ответ не содержит нарушений, я лишь отметил, что использование ресурсов не рационально (в том числе и массив на 1000 элементов: зачем создавать дополнительно 992 лишних ячеек в памяти, когда нужно лишь 8; или если кто-нибудь введёт больше 1000 элементов, в условии ведь не сказано про такое ограничение).
Ответ дал:
0
Задание 1:
- begin
- var a := ArrRandom;
- a.Println;
- Print('Результат:',a[8]+a[9])
- end.
Задание 2:
- begin
- var a := ReadArrInteger(ReadInteger('N:'));
- a.Transform(x->x>0?x*x:x);
- a.Print
- end.
Примеры работ:
Приложения:
Вас заинтересует
2 года назад
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад