uses crt;
type
massiv = array [1..100] of integer; // объявляем свой тип данных
var
mass : massiv ;
sum, proiz , i , n: integer;
begin
clrscr;
write('Введите длину массива : '); readln(n);
sum := 0 ;
proiz := 1 ; // единица потому что у нас умножение, если умножать на 0 будет 0 всегда!!
for i:=1 to n do
begin
write('Введите ', i , ' элемент : '); readln(mass[i]);
if (mass[i] mod 2 = 0) then sum := sum + mass[i]
else proiz := proiz * mass[i];
end;
writeln('Сумма четных равна ', sum);
writeln('Произведение нечетных равно ', proiz);
readln; // чтобы программа не закрывалась
end.
1979 жылы екі экономист студент Дэн Бриклин және Боб Френкстон үй тапсырмасын тез орындауға көмектесетін және уақытты үнемдейтін әдіс ойлап табуды шешті. Олар тарихта бірінші рет электронды кесте бағдарламасын жазып, оны Visible Calculator сөзінен қысқартылған VisiCalc (Көрсеткіш калькулятор) деп атады. сондықтан барлық электрондық кестелер бағдарламасы, оның ішінде Excel программасы Дэн мен Бобтың арқасында жүзеге асты. IBM және Macintosh компьютерлерінде жұмыс істейтін, ең озық үлгілерді ала отырып, бүгінгі заман талабына сай жасалған, электрондық кесте құрастыратын қолданбалы программа. Excel-дің соңғы нұсқаларында график тұрғызу, күрделі функциялар арқылы есеп-қисап жүргізу және бірнеше жұмыс кітаптарымен қатар жұмыс атқару сияқты мүмкіндіктер кеңінен қолданылады. Кестелік құрылымды құжаттармен жұмыс істеуге арналған кең таралған құралдардың бірі Microsoft Excel. Ол сандық мәліметтермен жұмыс істеу үшін негізделген.
Поделитесь своими знаниями, ответьте на вопрос:
1.файл размером 36 кбайт был передан через adsl-соединение за 9 с.определите скорость передачи данных через adsl-соединение в кбит/с 2.скорость передачи данных через adsl-соединение равна 256000 бит/с.передача файлов через это соединение заняла 2 минуты.определите размер файлов в килобайтах. 3.скорость передачи данных через adsl-соединение равна 128 кбит/с.размер файла составляет 368 кбайт.определите время передачи файла в секундах. написать дано и решение.