Разрешение сканара А. Точки на дюйм
Наименьгая единица информации Е. Бит
8 двоичных разрядов Г октет
Ответ:
Чтобы сложить дроби с одинаковыми знаменателями, надо сложить их числители, а знаменатель оставить без изменений.Чтобы вычесть дроби с одинаковыми знаменателями, надо из числителя первой дроби вычесть числитель второй, а знаменатель опять же оставить без изменений.
Объяснение:
Нужно что-то присвоить функции для случая, когда (2*a+b-c)<0
Например, так:
function sqrt1 (a, b, c: real): real;
begin
if (2 * a + b - c) < 0 then
<span>begin writeln (' complex number '); sqrt1:=-1; end</span>
else sqrt1:= sqrt(2 * a + b - c);
<span>end;</span>
<em>// PascalABC.NET 3.2, сборка 1431 от 28.04.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(12,-50,50); a.Println;
Writeln('Сумма нечетных элементов: ',a.Where(k->k.IsOdd).Sum)
end.
<u>Пример</u>
22 -27 4 3 -30 -25 29 -27 -44 26 21 -28
Сумма нечетных элементов: -26
begin
var w:array[1..4] of string;
var s:string:='';
for var i:=1 to 4 do begin Readln(w[i]); s:=s+w[i] end;
for var i:=1 to 3 do Writeln(s+' '+i*'!')
end.
<u>Пример</u>
Первое
Второе
Третье
Четвертое
ПервоеВтороеТретьеЧетвертое !
ПервоеВтороеТретьеЧетвертое !!
ПервоеВтороеТретьеЧетвертое !!!