#include <iostream> // для операции вывода cout
using namespace std; // вместо 'std::' перед cout
int main() {
// цикл в промежутке [1; 9] с шагом 2 (1, 3, ...)
for (int i = 1; i <= 9; i += 2) {
cout << i << ' '; // вывод текущего числа
}
return 0; // возврат из основной функции
}
Program SpTrap;
var y , x :integer;
begin
writeln ('ВВеди переменную x');
readln (x);
y:=0
<span>у=(х+1)/2х;
writeln('y=',y);
end
-----------------------------------------------------------------
</span>1. Начало алгоритма
2. Ввод (х)
3. Если (х не равно 0) И (а не равно нулю)
4. y:= (х+1)/2х.
5. Иначе
6. Вывод ('Функция не определена')
7. Конец алгоритма
-----------------------------------------------------------------------------
1. Начало алгоритма
2. объявление переменных
3. Объявление (х)
4. Если (х не равно 0) И (x не равно нулю)
5. y:= (х+1)/2х.
6. Иначе
7. Вывод ('Функция не определена') или ('y=',y)
8. Конец алгоритма
Ответ:
11001110010(2)+2440(8)=1650(10)+1312(10)=2962(10)=B92(16)
11001100111(2)+3225(8)=1639(10)+1685(10)=3324(10)=C98(16).
Объяснение:
Цифры в скобках показуют систему счисления числа:
(10)-десятичная, (2)-двоичная, (16)-шестнадцатиричная.
Procedure premia(days : integer; hasBadThings : boolean; stazh : integer; oklad : integer);
var
prem : real;
begin
prem := 0;
if not hasBadThings then
begin
if (days > 45) and (stazh > 5) then
prem := oklad * 20 / 100
else if (days > 35) and (days < 45) and (stazh > 5) then
prem := oklad * 15 / 100
else if (days < 25) and (stazh > 5) then
prem := oklad * 7 / 100
else if (days < 25) and (stazh < 5) then
prem := oklad * 5 / 100
else if (days < 35) and (stazh > 5) then
prem := oklad * 10 / 100 end;
writeln('Премия сотрудника: ', trunc(prem));
end;
var
days, stazh : integer;
hasBadThings :boolean;
begin
write('Стаж: ');
readln(stazh);
write('Замечания (True/False): ');
readln(hasBadThings);
write('Отработанные дни: ');
readln(days);
premia(days, hasBadThings, stazh, random(20000) + 20000);
end.
Var
amoebas, t: integer;
begin
amoebas := 1;
t := 0;
repeat
t := t + 3;
amoebas := amoebas * 2;
Writeln(amoebas, ' амеб через ', t, ' часа');
until t >= 24;
end.