Задача

[bestik]

Сижу на экзе,плиз помогите решить задачку

Задан фрагмент алгоритма:
если a<b, то c=2*(a-b)
d=0
пока c>a выполнить действия d=d+1, c=c-1
Написать программу по алгоритму для вычисления и вывода значений переменных c и d ,
при начальных значениях a=8, b=3

Решаем в Visual studio 2005

Плиз,если ктото сможет,вроде несложная
потом сочтемся

[bestik]

как написать на VB эту строку??!!
пока c>a выполнить действия d=d+1, c=c-1
пока это while а выполнить дейтсвие это что?

[procedure]

int a, b, c, d;
a = 8; b = 3;
if (a < b)
c = 2 * (a - b);
d = 0;
while (c < a)
{
d++;
c--;
}
Console.WriteLine("c = {0}, d = {1}", c.ToString(), d.ToString());
Вот твоя программа на C#. Но,
если a<b, то c=2*
нужно инициализировать переменную "c" если условие не true.

[bestik]

спасибо..но как этот код в код вб перевести? :(
пробовал копи-паст - не работает
вот что на форуме программистов написали :
DIM a, b, c, d AS SINGLE
INPUT "enter a: "; a
INPUT "enter b: "; b
INPUT "enter c: "; c
INPUT "enter d: "; d
IF a < b THEN
c = 2 * (a - b)
d = 0
END IF

DO WHILE c > a
d = d + 1
c = c - 1
LOOP

PRINT USING "c= ###, d=###"; c; d

END
тоже не пашет ((