PascalABC.NET:
begin
var a:=ArrRandom(50,-500,500);
a.Println;
var k:=a.Where(x->(abs(x) mod 10 = 3)).Count;
var s:=a.Where(x->(abs(x) mod 10 = 3)).Sum;
if k=0 then writeln('В массиве нет элементов, оканчивающихся цифрой 3')
else Writeln('Среднее арифметическое элементов массива, оканчивающихся цифрой 3 = ',s/k);
end.
Пример (для 10 элементов):
450 -159 189 463 262 220 -125 -41 -178 -62
Среднее арифметическое элементов массива, оканчивающихся цифрой 3 = 463
Лазерных точно не существует.
Program kek;
Var a, c:integer;
Begin
c:=0;
a:=1;
While a<>0 do begin
Writeln('Вводите целые числа. Когда закончите - введите "0"');
Readln(a);
If (a>0) and (a mod 10 = 1) then do begin
c:=c+a;
end;
End;
Writeln(c);
End.
Вроде так. Нет возможности проверить.
<span>Основные этапы развития вычислительной техники Самая популярная классификация предлагает выделить основные этапы развития вычислительной техники по хронологическому принципу: Ручной этап. Он начался на заре человеческой эпохи и продолжался до середины XVII столетия. В этот период возникли основы счёта. Позднее, с формированием позиционных систем счисления, появились приспособления (счёты, абак, позднее - логарифмическая линейка), делающие возможными вычисления по разрядам. Механический этап. Начался в середине XVII и длился почти до конца XIX столетия. Уровень развития науки в этот период сделал возможным создание механических устройств, выполняющих основные арифметические действия и автоматически запоминающих старшие разряды. Электромеханический этап – самый короткий из всех, какие объединяет история развития вычислительной техники. Он длился всего около 60 лет. Это промежуток между изобретением в 1887 году первого табулятора до 1946 года, когда возникла самая первая ЭВМ (ENIAC). Новые машины, действие которых основывалось на электроприводе и электрическом реле, позволяли производить вычисления со значительно большей скоростью и точностью, однако процессом счёта по-прежнему должен был управлять человек. Электронный этап начался во второй половине прошлого столетия и продолжается в наши дни. Это история шести поколений электронно-вычислительных машин – от самых первых гигантских агрегатов, в основе которых лежали электронные лампы, и до сверхмощных современных суперкомпьютеров с огромным числом параллельно работающих процессоров, способных одновременно выполнить множество команд. Этапы развития вычислительной техники разделены по хронологическому принципу достаточно условно. В то время, когда использовались одни типы ЭВМ, активно создавались предпосылки для появления следующих. - Читайте подробнее на SYL.ru: </span><span>https://www.syl.ru/article/169938/new_istoriya-razvitiya-vyichislitelnoy-tehniki-otechestvennaya-vyi...</span>
