using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace ConsoleApplication1
{
class Program
{
public static bool flag = false; //выставляется в true когда попали в заданную точку
static void Main(string[] args)
{ // точка в которую необходимо попасть
int X = 10;
int Y = 15;
for (int i = 0; i < 8; i++)
{
if (!flag) //пока не попали
{
fun(X, Y); //выполняем функцию
}
else
{
//как только попали выходим из цикла
break;
}
}
}
/// <summary>
/// функция расчёта попадания в точку
/// </summary>
/// <param name="X"> Координата Х точки</param>
/// <param name="Y"> Координата У точки</param>
static void fun(int X, int Y)
{
int x, y;// координаты введенные пользователем
Console.WriteLine("Введите X:");
x = Convert.ToInt32(Console.ReadLine()); //ввод координты х
Console.WriteLine("Введите Y:");
y = Convert.ToInt32(Console.ReadLine()); //ввод координаты у
if (x != X) // если введенная координата не равна заданной
{
if (x <= X - 4) //если отклонение от цели больше 4
{
Console.WriteLine("Возьмите правее");
}
if (x > X + 4)//если отклонение от цели больше 4
{
Console.WriteLine("Возьмите левее");
}
if (x > X - 4 && x < X) //если отклонение от цели меньше 3
{
Console.WriteLine("Возьмите немного правее");
}
if (x < x + 4 && x > X) //если отклонение от цели меньше 3
{
Console.WriteLine("Возьмите немного левее");
}
}
// если введенная координата не равна заданной
if (y != Y)
{
if (y <= Y - 4)//если отклонение от цели больше 4
{
Console.WriteLine("Возьмите выше");
}
if (y >= Y + 4)//если отклонение от цели больше 4
{
Console.WriteLine("Возьмите ниже");
}
if (y > Y - 4 && y < Y)//если отклонение от цели меньше 3
{
Console.WriteLine("Возьмите немного выше");
}
if (y < Y + 4 && y > Y)//если отклонение от цели меньше 3
{
Console.WriteLine("Возьмите немного ниже");
}
}
if (x == X && y == Y)//если попали
{
Console.WriteLine("Попали!!!");
flag = true; //выставляем флаг
}
}
}
}
Pascal Диалоговая программа
Составьте диалоговую программу угадывания случайно выбранных координат цели в квадрате: по оси х от –10 о 30, по оси у от 2 до 28 c восьми попыток с двойным сообщением корректировщика, например: уменьшить Х, либо: немного уменьшить Х (если отклонение от цели меньше 3).
Помогите решить. Заранее спасибо
Цитата: ANTON2527
Помогите решить. Заранее спасибо
что конкретно у вас не получается? (ответ программа не принимается:))
Цитата: Енот_в_Засаде
что конкретно у вас не получается? (ответ программа не принимается:))
Скажем так не могу решить эту задачу, не знаю как, не умею :)
Код:
комменты написал, разобраться несложно, на паскаль, я думаю, сможете переписать