Var
k, c: integer;
begin
k := 1;
for c := 1 to 5 do
if c mod 2 <> 0 then
k := k * c;
writeln(k);
end.
Ответ 15
Math.Cos(пх)
Если имеется в виду VB.net
Какое где фотография!?!?!!?
1) Щелчке правой кнопки мыши по экрану рабочего стола.
2) Наведите курсор на слово "создать", в всплывающем окне.
3) Щелкните на "папку" (левая кнопка мыши).
4) Создаться папка "новая папка."
5) Введите название папки.
6) Нажмите enter.
7) Откройте "мой компьютер" (пуск, мой компьютер).
8) Сделайте "мой компьютер" на пол экрана (вверху справа)
9) Перетащите папку в диск С.
То средние значение от B3 до B8 поделим на 2
240\6=40 это ответ выполненный после твоей формулы
Лукас мне:3