2. В ячейке В2 записана формула =SA$2+100 (значение в ячейке условно не показано): A2-7 Аз-5, А4-15, А5-3, ВС=11, В4-21, В 5-15, C2-1,C3=2, C4=3. Ее скопировали в ячейку С4. Какое значение будет выведено в ячейке С43
№1.написать программу ввода с клавиатуры и вывода на экран значений одномерного массива а, состоящего из n вещественных элементов (n=10). найти сумму элементов этого массива и вывести ее на экран.№2. используя оператор выбора, написать программу которая запрашивает у пользователя номер месяца и
выводит на экран соответствующее название времени года. в случае если пользователь укажет недопустимое число, программа должна вывести сообщение “ошибка вывода данных. повторите ввод”.№3.дан одномерный массив в из n вещественных элементов (n=10). написать программу, которая вводит значения элементов
этого массива с клавиатуры, выводит элементы массива одной строкой, находит наибольший элемент и выводит результат поиска на экран.№4.задана некоторая строка s$. дано число k и слово а$. вставить в строку после k-ого символа слово а$, результат вывести на экран.№5.составить программу, которая 100
элементов одномерного массива d заполняет квадратами первых ста целых чисел и выводит их на экран.№6. ввести с клавиатуры значения n вещественных элементов массива с (n = 10), посчитать количество отрицательных и сумму положительных элементов. результаты вывести на экран.№7.написать программу,
которая, используя генератор случайных величин выводит на экран пример на умножение 2-х случайных однозначных чисел, запрашивает ответ пользователя, проверяет его и выводит сообщение “ правильно! ” или “вы ошиблись” и правильный ответ.ниже рекомендуемый вид экрана во время работы программы: сколько
будет 6*7 ? введите ответ и нажмите -> 56вы ошиблись. 6*7 = 42.№8.написать программу, которая используя функции mod (остаток от деления) и div (целая часть от деления) находит сумму чисел любого трехзначного числа, число вводится с клавиатуры.№9написать программу подсчета количества чисел
кратных 7 на отрезке от 40 до 120. результат вывести на экран.
Если элементы массива идут по возрастанию, то вот так
program wstawka; uses crt; const min=1; max=20; type zona=min..max; massiw=array[zona] of integer; var mas:massiw; i,j:zona; a,N,M:integer; T:boolean; BEGIN randomize; clrscr; N:=random(20); writeln('4ucJlo N = ',N); M:=random(20); Writeln('4ucJlo M = ',M); for i:=min to max-2 do begin mas[i+1]:=mas[i]+random(5); write(mas[i],' '); end; for i:=min to max-2 do if (mas[i]>N) and (t=false) then begin t:=true; a:=mas[i]; mas[i]:=N; for j:=i+1 to max do begin N:=mas[j]; mas[j]:=a; a:=N; end; end; for i:=min to max-1 do if (mas[i]>M) and (t=true) then begin t:=false; a:=mas[i]; mas[i]:=M; for j:=i+1 to max do begin M:=mas[j]; mas[j]:=a; a:=M; end; end; writeln; for i:=min to max do write(mas[i],' '); readkey; END.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку