Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 26.12.2010, 01:20   #1
denon2216
Новичок
Джуниор
 
Регистрация: 26.12.2010
Сообщений: 1
По умолчанию C# и Delphi

C#
Задание 1. Найти все трехзначные числа, представимые в виде сумм кубов своих цифр.

For (int x=1, int y=0, int z=0:x<=9,y<=9,z<=9;z++,x++,y++);
If (100*x+10*y+z=x*x*x+y*y*y+z*z*z) Console.WriteLine(”Число = {0}”,100*x+10*y+z );
Else Console.WriteLine(”Таких чисел нет” );
Понимаю, что задача легкая, но проблемы с оформлением (
Задание 2. Записать программный код программы, которая выводит на экран в виде таблицы значения функции, заданной графически на интервале от xmin до xmax с шагом dx. Заглавие таблицы снабдить всеми необходимыми атрибутами (общим заголовком и заглавиями столбцов).

СМОТРЕТЬ КАТРИНКУ 1

Задание 3. Для десяти выстрелов, координаты которых задаются с клавиатуры, вывести текстовые сообщения о попадании в мишень с областью задания согласно рисунка.

СМОТРЕТЬ КАРТИНКУ 2

В этой задаче проблемы с описанием графика
namespace ConsoleApplication1
{
class Program
{
static void Main(string[] args)
{ double x, y, r;
for (int i = 1; i < 11;i++ ) {
Console.WriteLine("попытка {0}",i);
Console.WriteLine("Введите х,у,r");
x = Convert.ToDouble( Console.ReadLine());
y = Convert.ToDouble(Console.ReadLine() );
r = Convert.ToDouble(Console.ReadLine() );
if ( Не получается написать условия…)
{
Console.WriteLine("Точка принадлежит данной области");
}
else
{
Console.WriteLine("Точка не принадлежит данной области ");
}
Console.ReadKey();
}
}
}
}
Delphi Стеки
Задание 1. Ребята после игры с кубиками построили 2 одинаковых по высоте столбика (по 10 кубиков). Кубики пронумерованы от 1 до 20. Робот-дежурик может держать в руке лишь один кубик, а другой перекладывать кубики с одного из столбиков в коробку или же на другой столбик. Брать кубик из коробки робот не умеет. Необходимо написать для робота программу по упорядоченной укладке кубиков в коробку (либо от 1 до 20, либо от 20 до 1). Робот видит лишь номер верхнего кубика столбика.
Задание 2. В одной из фирм заведен следующий порядок: разрешалось приходить на работу в любое удобное время; уход с работы допускался лишь через 8 часов. Для контроля использовался компьютер с двумя стеками: рабочим и стеком с карточками работников для выдачи при уходе с работы. В компьютере использовалась система регистрации (индивидуальные карточки, которые работники опускали в регистратор по приходу на работу, по уходу с работы (вовремя) возвращались работнику обратно). В случае необходимости, работник обращался к руководителю фирмы для преждевременного ухода с работы или же увеличения продолжительности рабочего дня. Для данных ситуаций необходимо разработать алгоритм по изменению содержимого стека карточек ухода.
З.Ы. В архиве модуль и справка
Длинная арифметика
Задание 1. Составить программу деления числа a на число b, если a, b — многозначные числа.
Задание 2. Вычислить 100! + 2^100.
Вложения
Тип файла: rar модуль и справка.rar (6.7 Кб, 6 просмотров)
Тип файла: rar КАРТИНКА 2.rar (12.8 Кб, 13 просмотров)
Тип файла: rar КАРТИНКА 1.rar (18.7 Кб, 10 просмотров)
denon2216 вне форума Ответить с цитированием
Старый 26.12.2010, 19:26   #2
kat297
Пользователь
 
Регистрация: 01.06.2010
Сообщений: 18
По умолчанию

Вот как-то так)
ЗАдание 1

Цитата:
using System;
// Найти и распечатать все натуральные трехзначные числа, равные сумме кубов своих цифр.

class Program
{
static void Main(string[] args)
{

int a, b, c;

for (int i = 100; i < 1000; i++)
{
a = i / 100;
b = (i - a * 100) / 10;
c = i - a * 100 - b * 10;
if (i == (Math.Pow(a, 3) + Math.Pow(b, 3) + Math.Pow(c, 3)))
Console.WriteLine(i);

}

Console.ReadLine();

}
}
kat297 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
На Delphi 7 сделать игру кто хочет стать миллионером в delphi 7 666dart666 Помощь студентам 11 04.11.2010 17:57
Rad Studio 2011 XE: новое в Delphi, C++ Builder, RadPHP и Delphi Prism savva-paladin Софт 18 02.10.2010 20:24
Delphi. Как нарисовать в Delphi два движущиеся шара с определенной скоростью? redred Общие вопросы Delphi 10 11.12.2007 10:43
Как открыть БД, написанную в Delphi если нf другой машине Delphi нет? dagarik БД в Delphi 7 22.10.2007 17:54
не StringGrid1.Cells[1,1]:='Delphi'; а вот так SG1.C[1,1]:='Delphi' Nemesisking Компоненты Delphi 7 08.09.2007 03:27