Мастер,Эксперт!А если честно,то задание не очень понятно:)
<span>тело цикла, выполнятся 7 раз</span>
Var x, y, z, k: integer;
begin
readln(x, y, z);
k:=0;
if (x mod 3 = 0) then begin inc(k); writeln(x, ' кратно трем');end;
if(y mod 3 = 0) then begin inc(k); writeln(y, ' кратно трем');end;
if (z mod 3 = 0) then begin inc(k); writeln(z, ' кратно трем'); end;
if (k =0) then writeln('Переменных, кратных трем, не обнаружено!');
end.
1).wix
2).zzz
это бесплатной хостинг и бесплатной сайт для создания сайтов
3).ибо вручную либо конструктором
Я так понимаю, задача на вывод формулы?
!! Если V - стоимость конфет за килограмм, то
- стоимость за грамм.
Количество граммов конфет, которые Андрей может купить на сдачу можно рассчитать по формуле:
Или, если в виде, подходящем для программы:
"N = 1000(S - (n_1 * v_1 + n_2 * v_2))\V".