"ЦЕНА" - ячейка где записана цена
Записывать формулу в ячейку результата
1) ЕСЛИ((ЦЕНА<45);(ЦЕНА*1,15))
2)ЕСЛИ(И((ЦЕНА>=45);(ЦЕНА<70));(ЦЕНА*1,2))
3)ЕСЛИ(И((ЦЕНА>=70);(ЦЕНА<100));(ЦЕНА*1,25))
4)ЕСЛИ((ЦЕНА=100);(ЦЕНА*1,28))
Проверь по скобкам
Var a:array [1..10] of integer;
i, k:integer;
begin
For i:=1 to 10 do
begin
a[i]:=random(9);
Write(a[i],' ');
If a[i] = 5
then
k:=k+1;
end;
Writeln;
Writeln(k);
end.
Количество уровней интенсивности = 2^16 = 65536
A:= 4;
b:= 2;
b:= a/2*b = 4/2*2 = 4/4 = 1;
a:= 2*a+3*b = 2*4+3*1 = 8+3 = 11;
a = 11;
b = 1;
"солнце" - круг с точкой в центре
"идти" - две ноги
"хлеб" - полукруг
"рот" - сильно вытянутый полуовал вроде так