Техника работающая с визуальной информацией

Знания

Информатика

1 ответ:

KSI-UA4 года назад

0 0

Кинокамера, фотоаппарат, сканер, металлодетектор

Читайте также

Найти сумму элементов массива с четными номерами позиции В Pascal. Очень нужно!!!!

Юрий Мельник [190]

Var summ:integer;
begin
var a := Arr(1,2,3,4,5,6,7,8,9);
for var i:=0 to 8 do begin
write('[',a[i],'] ');
end;
writeln('');
for var i:=0 to 8 do begin
if (i mod 2)=1 then begin
summ:=summ+a[i];
write('[',a[i],'] ');
end;
end;
writeln('summa = ',summ);
<span>end.</span>

0 0

4 года назад

Помогите, пожалуйста, с паскалем! Входные данные Вводятся 2 числа: x и d. Выходные данные Подсчитайте и выведите одно число - ск

Дилед

Var
x,d,count:integer;
begin
write('x=');
readln(x);
write('d=');
readln(d);
    while x>0 do
    begin
        if x mod 10 = d then
        count:=count+1;
        x:= x div 10;
    end;
    writeln(count);
end.

0 0

4 года назад

Устройство которое называют мозгом компьютера

testlick

Процессор оалалалсьаатат

0 0

4 года назад

Составить программу для вычисления суммы квадратов чисел от 20 до 55

денис саныч

PascalABC:

varsum ,i :longint;beginfor i:=20 to 55 dosum:=sum+i*i;writeln(sum);end.

0 0

4 года назад

1)Устройство, при помощи которого можно переслать картинки, документы и фотографии на компьютер? 2)Устройство, при помощи которо

Лави

1) сканер
2) цифровой фотоаппарат

0 0

5 лет назад