Решите пожалуйста третью задачу
10-11 класс
|
program z3;
var a,b,x,y,x2,y2,m1,m2,b2:real;
begin
write('Введите массу бегуна, где x - вес в пудах, y - в фунтах: x=');
read(x);
write(', y=');
readln(y);
Write('Введите массу лыжника, где а - вес в килограммах, b - в граммах: a=');
read(a);
write(', b=');
readln(b);
x2:=x*16.38;
y2:=(y/40)*16.38;
m1:=x2+y2;
b2:=b/1000;
m2:=a+b2;
if m1=m2 then writeln('Вес бегуна и лыжника одинаков');
if m1>m2 then writeln('Бегун весит больше')
else writeln('Лыжник весит больше');
end.
Другие вопросы из категории
F = X &¬Y v ¬X & Y.
вычислите:((1 & 0)1)&(1A) решите пожалуйста срочно надо.За ранее спасибочки*)
1)Иван
2)Марина
3)Ирина
4)Степан
(K ^ L ^ M) → (¬M ^ N) = 1
где K, L, M, N – логические переменные? В ответе не нужно перечислять все различные наборы значений K, L, M и N, при которых выполнено данное равенство. В качестве ответа вам нужно указать только количество таких наборов.
Читайте также
результат сравнения двух чисел.
3)Вести линейный массив и вычислить сумму всех элементов этого массива.
найти номер третьего положительного элемента в потоке из 10 чисел или сообщить,что трех положительных элементов нет. (Решать без массива)
не понимаю как решать? помогите пожалуйста.
там она говорит что надо решать в Excel.