4 года назад

Составить программу вычисления скорости из км/ч в м/с в программе абс паскаль

1 ответ:

0 0

Program n1;
var a: real;
begin
write('введите скорость в км/ч: ');
readln(a);
write('эта скорость в м/с: ',a*5/18);
end.

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

Ввести с клавиатуры 10 чисел и найти сумму отрицательных чисел.(Паскаль)

zver234

Var i,k,s:integer;
begin
writeln ('Введи 10 чисел');
for i:=1 to 10 do
begin
readln (k);
if k<0 then s:=s+k;
end;
writeln (s);
end.

0 0

4 года назад

Помогите решить задачу на паскале по наxождению количества отрезков по 1,5 метров из бруска 20 метров

Лялятка [7]

Ответ:

Объяснение:

Ниже составлена универсальная программа для задач такого типа. Все, что вам требуется-прописать в поле констант g как отрезок, h как целое. Прога выведет количество k отрезков g в бруске или чем-то таком h.

const

g = 1.5;

h = 20;

var

l : real;

k : integer;

begin

l:= 0;

k:= -1;

while l < h do begin

l:= l + g;

k:= k + 1;

end;

write(k);

end.

0 0

3 года назад

ИНФОРМАТИКА 8 КЛАСС ПОМОГИТЕ НА УРОВНЕ 8 КЛАССА! Составьте алгоритм возведения четного числа в квадрат ,а нечетного к куб. С пом

quelle999

Var a:integer;
begin
readln(a);
if a mod 2=0 then a:=a*a
else a:=a*a*a;
writeln('a = ',a);
end.

Пример:
18
<span>a = 324</span>

0 0

4 года назад

Программирование на PythonТЕМА: Перевод единиц измеренияЗаданиеНапишите программу, которая бы выполняла переводединиц измерения.

Анна14701

Ответ:

a = float(input("Введите в каких единицах измерения будите вводить числа. 1 - килобайты, 2 - мегобайты, 3 - гигобайты... (терабайт, петабайт, эксабайт, зеттабайт, йоттобайт) "))

b = float(input("введите число "))

vid = float(input("введите в какие единицы хотите перевести число (см первую запись) "))

d = 1024**a * b

er = 1024**vid

print(d/er )

Объяснение:

0 0

4 года назад

Рассчитайте объём видеопамяти (в Мб), необходимой для хранения графического изображения, занимающего весь экран монитора с разре

Чингиз моё имя [49]

16 777 216 = это 2 в 24-й степени, значит каждый пиксель занимает 24 бит, то есть 3 байта
1280 x 720 = 921600 пикселей в изображении
921600 x 3 = 2764800 байтов занимает изображение
2764800/1024/1024 ≈ 2,64 Мегабайт памяти занимает изображение

0 0

4 года назад