Я, в основном, программы на С++ пишу, но из школы про Паскаль кое-что помню (в смысле, попытаюсь написать на Паскале).
Program A1;
var a,b,c,i:integer;
begin
write('Enter the a: ');
read(a);
writeln('Enter the b: ');
read(b);
с:=0;
for i:=1 to a Do
c:=c+b;
writeln('a*b=',c:5:0);
end.
Объясняю (начинаю сразу с цикла for): что значит произведение двух натуральных чисел а и b - это означает, сложить b с самим собой по а раз (можно и наоборот). Например, a=5, b=3. Переменную с=0 будем складывать с b.
i=1 c=5+0;
i=2 c=5+5;
i=3 c=10+5; //c=15
Вот и есть ответ: 5*3=15.
254000000 = 254 · 10⁶
254 = 0.254 · 1000 = 0.254 · 10³, тогда
254 · 10⁶ = 0.254 · 10⁶ · 10³ = 0.254 · 10⁹
<h2>Ответ</h2>
0.254 · 10⁹
Летающий автобус)
1. Мест в эконом-классе 120, а в бизнес-классе 40.
2. 100 процентов прибыли получим, если заполним все места. Билет в эконом-классе стоит в 2 раза меньше чем X. Получаем следующее уравнение:
40*X + 0.5*120*X = 100%, X = 1% от всей прибыли. Значит один билет в бизнес - классе приносит один процент прибыли. А один билет в эконом-классе приносит 0.5 процента прибыли.
3. Осталось рассчитать прибыль компании учитывая непроданные билеты:
P = 100 - b - 0.5*a и написать программу:
var a,b:integer;
begin
repeat
writeln('Введите количество непроданных билетов (a,b)');
readln(a,b);
until (a<=120) and (b<=40)and (a>=0) and (b>=0);
writeln('Прибыль компании составит ',100-b-0.5*a,'%');
end.
10101010(2) =170(10)
Решение:
Приведем 10101010 из системы счисления 2 в десятичную систему счисления
101010102=1·2(7) +0·2(6) +1·2(5) +0·2(4) +1·2(3) +0·2(2) +1·2(1) +0·2(0) =170(10)
252(8) =170(10)
Приведем 252 из системы счисления 8 в десятичную систему счисления
252(8)=2·8(2) +5·8(1) +2·8(0) =170(10)
7(16) =7(10)
Приведем 7 из системы счисления 16 в десятичную систему счисления
7(16)=7·16(0) =7(10)
170(10) - 170(10) + 7(10) = 7(10)