Проблема Не для идиотов.

[[Epta] Хлебная крошкa Енот]

Сообщение от ЗЕВС

ебашь по этим формулам

где p = (a + b + c) / 2.




Это стандартная структура, остальное сам ищи

это даже близко не стояло, т.к. нет цикла операций true/false, в общем этот шаблон для 7 класса.

[Зевс]

Сообщение от Trololoid

это даже близко не стояло, т.к. нет цикла операций true/false, в общем этот шаблон для 7 класса.

Вообще алгоритм с него нужно начинать а цикл выставляется по таблице, только я че то найти не могу, погугли

[[Epta] Хлебная крошкa Енот]

Сообщение от ЗЕВС

Вообще алгоритм с него нужно начинать а цикл выставляется по таблице, только я че то найти не могу, погугли

знал бы я что гуглить, я вообще 0, передающий слова моего кореша со скайпа .

[PeterStormare]

В овале: начало
В шестиугольнике: Cells(i, 2) <> ""
От шестиугольника в ромб: Cells(i, 2)
От ромба по плюс стороне, в прямоугольнике:d = Cells(i, 4) * Cells(i, 5) - Cells(i, 4) * Cells(i, 5) * 0.15
Cells(i, 6) = d
От ромба по минус стороне в прямоугольнике: d = Cells(i, 4) * Cells(i, 5)
Cells(i, 6) = d

Это блок схема до этой части вроде.

Public Sub Stoimost()
Dim d As Long
i = 3
d = 1
Do While Cells(i, 2) <> ""
If Cells(i, 2) = "Монитор" Then
d = Cells(i, 4) * Cells(i, 5) - Cells(i, 4) * Cells(i, 5) * 0.15
Cells(i, 6) = d
Else: d = Cells(i, 4) * Cells(i, 5)
Cells(i, 6) = d

Точность не гарантирую, т.к. этот язык прог-я мне не знаком, БС построил на основе своих знаний английского и азов прог-я на паскале.

Юзать только если других вариантов нет.

[[Epta] Хлебная крошкa Енот]

Сообщение от PeterStormare

В овале: начало
В шестиугольнике: Cells(i, 2) <> ""
От шестиугольника в ромб: Cells(i, 2)
От ромба по плюс стороне, в прямоугольнике:d = Cells(i, 4) * Cells(i, 5) - Cells(i, 4) * Cells(i, 5) * 0.15
Cells(i, 6) = d
От ромба по минус стороне в прямоугольнике: d = Cells(i, 4) * Cells(i, 5)
Cells(i, 6) = d

Это блок схема до этой части вроде.


Точность не гарантирую, т.к. этот язык прог-я мне не знаком, БС построил на основе своих знаний английского и аза прог-я на паскале.

Юзать только если других вариантов нет.

шестиугольника же вроде нету :zeleniydebil:

---------- Post added at 22:55 ---------- Previous post was at 22:55 ----------

Сообщение от Разрешатель

Какой это язык то?

visual basic

[PeterStormare]

Сообщение от Trololoid

шестиугольника же вроде нету :zeleniydebil:

А циклы по твоему как обозначаются?

[[Epta] Хлебная крошкa Енот]

Сообщение от PeterStormare

А циклы по твоему как обозначаются?

ходит инфа что стрелочками

---------- Post added at 22:58 ---------- Previous post was at 22:58 ----------

говорю же дуб дубом

[PeterStormare]

Сообщение от Trololoid

ходит инфа что стрелочками

---------- Post added at 22:58 ---------- Previous post was at 22:58 ----------

говорю же дуб дубом

овал - начало/конец
Прямуог - вычисления
Параллелограм - ввод/вывод
Ромб - разветвление (исп в ситуациях If ... else)
6-угольник - цикл.

[[Epta] Хлебная крошкa Енот]

Сообщение от PeterStormare

В овале: начало
В шестиугольнике: Cells(i, 2) <> ""
От шестиугольника в ромб: Cells(i, 2)
От ромба по плюс стороне, в прямоугольнике:d = Cells(i, 4) * Cells(i, 5) - Cells(i, 4) * Cells(i, 5) * 0.15
Cells(i, 6) = d
От ромба по минус стороне в прямоугольнике: d = Cells(i, 4) * Cells(i, 5)
Cells(i, 6) = d

Это блок схема до этой части вроде.


Точность не гарантирую, т.к. этот язык прог-я мне не знаком, БС построил на основе своих знаний английского и азов прог-я на паскале.

Юзать только если других вариантов нет.

благодарю, практически правильно)

[.Secret]

ответ: 7