Найти скорость падения кирпича. v=√(2∙g∙h). g=(9,8)
10-11 класс
|
program dsa;
uses wincrt;
var
g,h,v: real;
begin
g:=9.8;
writeln('Введите высоту');
readln(h);
v:= sqrt(2*g*h);
writeln('Скорость равна ', v);
end.
Другие вопросы из категории
i,j,imax,n:byte;
Begin
j:=0;
write('Введите размер массива: ');readln(n);
For i:=1 to n do
Begin
readln(A[i]);
if (j=0)and(A[i]<0) then j:=i;
End;
writeln;
if j>0 then
Begin
if j<>n then imax:=j+1
else writeln('Первый отрицательный находится последним');
if imax<>0 then
For i:=imax+1 to n do
if A[i]>A[imax] then imax:=i;
if imax>0 then writeln('Max = ',A[imax]);
End
else writeln('Нету отрицательных');
readln;
End.
1) z=(min(x, y)+0,5))/(1+max^2(x, y)).
2)z=система max(x, y), x<0
min(x, y), x>=0.
Выведите на экран исходный и полученный массив. На Паскале
Читайте также
1) Найти скорость передачи файла в (кбит/с)
Разрешение графического файла 300х600
Глубина цвета 16 бит
Время передачи 2 минуты
Скорость - неизвестно ( нужно найти в Кбит/с )
2)найти время передачи аудио файла
Время звучания аудио файла 3 минуты
Скорость передачи файла 2 Мб/с
44 КГц квадро
8 бит
передавать эти данные по другой линии связи со скоростью 4 Мбит/с. Сколько секунд пройдет от начала приема данных по высокоскоростному каналу до полной передачи их по низкоскоростному каналу?
2. Найти больше из трех данных чисел.
3. В одномерном массиве положительные элементы меншиты на 7.
лементов. Результат распечатать в виде:
Сумма наибольших=
Сумма наименьших=
№2
Даны два массива по 30 элементов. Найти среднее арифмитическое для элементов 1-го массива,номера которых больше номера минимального элемента 2-го массива
Заранее спасибо
элементов.Найти колличество четных положительных элементов.
3)Дан массив из 6 элементов.Найти произвдение положительных из них.