Школьные Знания.com
Какой у тебя вопрос?
10 - 11 классыИнформатика 8+4 б
Дан массив вещественных чисел:
Все элементы с нечетными номерами заменить на их квадратный корень
Отметить нарушение РРПП 01.04.2013
ответы и объяснения
Проверенный ответ
Tlalok
Tlalok Почетный грамотей
var
a:array[1..100] of real;
i, n:integer;
begin
write('Введите количество элементов '); readln(n);
for i := 1 to n do
begin
write('a[', i ,'] = ');
readln(a[i]);
end;
writeln;
writeln('Исходный массив:');
for i := 1 to n do
begin
write(a[i], ' ');
if i mod 2 = 1 then
a[i] := sqrt(a[i]);
end;
writeln;
writeln;
writeln('Преобразованный массив:');
for i := 1 to n do
write(a[i]:0:2, ' ');
writeln;
end.
1) (А∧В)-конъюнкция-ложь
2) (С∨D)-дизъюнкция-истина
3) (А∧В)-конъюнкция-ложь
4) (В∧С)-конъюнкция-истина
5) (А∨В)-дизъюнкция-ложь
6) (С∧D)-конъюнкция-истина
7) А-инверсия-истина
8) В -инверсия-истина
Объяснение:
Дизъюнкция является ложной, только когда два утверждения ложные, в остальных случаях является истиной (то есть когда одно утверждение истина, а другое ложь то в итоге получается истина, а когда два утверждения ложь, то является ложью)
Конъюнкция является истиной только в случае, когда оба высказывания являются истинными (то есть если высказывания будут оба ложными то значение будет ложным, также если одно из высказываний будет ложным или истинным то значение высказывания будут ложным)
Инверсия обращает высказывание в противоположную сторону, истину - в ложь, а ложь - в истину.
a:array[1..10] of integer;
i, ans:integer;
begin
Writeln('Введите массив из 10ти элементов: ');
for i:= 1 to 10 do
read(a[i]);
i:= 1; ans:= 0;
while i < 10 do
begin
ans:= ans + a[i] * a[i+1];
i:= i + 2;
end;
Writeln(ans);
end.