<span>Можно одновременным нажатием клавиш Alt и Enter перенести текст в
следующую строку в этой же клетке.</span>
ЭВМ- электронная вычислительная машина, связана , что информатика- урок только для компьютер и разной техники!
2) Сейчас есть микро ЭВМ (Ноутбуки...) они используются для работы, для дома, для школы...
3)<span> В1946 в США </span>была создана первая электронная вычислительная машина<span> (</span>ЭВМ<span>) - ENIAC (Electronic Numerical integrator and Computer - </span>Электронный<span> числовой интегратор и </span>компьютер<span>).</span>
<span>var a,b,c,min:integer;
begin
readln(a,b,c);
if a<b then min:=a else min:=b;
if c<min then min:=c;
writeln('min = ',min);
end<span>.
Пример:
2 3 1
</span><span>min = 1</span></span>
// PascalABC.NET 3.0, сборка 1088
var
n,i,max,min,s,t,k:integer;
begin
Write('Введите количество членов последовательности: ');
Read(n);
Writeln('Вводите числа через пробел');
max:=-32768; min:=32767; s:=0; k:=0;
for i:=1 to n do begin
Read(t);
if t<min then min:=t
else
if t>max then max:=t;
if t<0 then begin s:=s+t; Inc(k) end
end;
Writeln('Min=',min,', max=',max,', ср.арифм.=',s/k:0:5)
end.
<em><u>Тестовое решение:</u></em>
Введите количество членов последовательности: 7
Вводите числа через пробел
25 -6 39 -118 271 24 -15
Min=-118, max=271, ср.арифм.=-46.33333