Нужно задачку на c# решить Написать консольное приложение для решения задачи. Даны три числа a, b, c. Выяснить, существует ли треугольник с такими сторонами. Если существует, является ли он прямоугольным.
Сами программы не проверял, если они правильные, то 2) program zak; uses crt; type danie=record litri:string; cislo:string; end; DanieVodi=file of danie; var DV:DanieVodi; D:danie; i,n:integer; begin clrscr; assign(DV,'d:\azaz.txt'); rewrite(DV); repeat writeln('BBeDuTe 4ucJlo u Mec9lTc oTTDeJl9l9l To4Kou'); readln(D.cislo); writeln('BBeDuTe KoJlu4ecTBo IIoTpa4eHou BoDbl'); readln(D.litri); if D<>'stop' then write(DV,D); until D='stop'; close(DV); readln; end.
1) uses crt; type danie=record litri:string; cislo:string; max,min:real; end; DannieVodi=file of danie; var DV:DannieVodi; D:danie; i,n:integer; cislo1:string; begin clrscr; assign(DV,'d:\azaz.txt'); reset(DV); write('BBeDuTe 4ucJlo u Mec9lTc oTTDeJl9l9l To4Kou:'); read(cislo1); while not eof(dv) do begin read(DV,D);
if min='0' then min:=StrToFloat(D.cislo); if StrToFloat(D.cislo)<min then min:=StrToFloat(D.cislo); if StrToFloat(D.cislo)>max then max:=StrToFloat(D.cislo);
if cislo1=D.cislo then writeln('6blJlo IIoTpa4eHo "',D.litri,'" JluTpoB BoDbi'); end;
writeln('min=',min); wtiteln('max=',max);
close(DV); readln; end.
Если это не учебная задача, то лучше сделать ее в Access. Там интерфейс красивый и дружелюбный легко получить.
1)Алгоритм решения задачи: Программа должна запрашивать у пользователя следующую информацию:диаметр бака;высота бака;расход краски (площадь поверхности, которую можно покрасить одной банкой краски).В результате программа должна выдавать количество требуемых банок. При получении дробного числа округление должно всегда происходить в большую сторону.Площадь крыши бака (круга) вычисляется по формуле p * d2 /4 (где p – число пи, d - диаметр). Площадь боковой поверхности цилиндра: p * d * h (где h – высота). Программа на языке Паскаль: const pi = 3.14; var d, h, b: real; top, wall, q: real; q_int: integer; begin write('Диаметр: '); readln(d); write('Высота: '); readln(h); write('Окрашиваемая площадь одной банкой: '); readln(b); top := pi * sqr(d) / 4.0; wall := pi * d * h; q := (top + wall) / b; q_int := trunc(q) + 1; write('Количество банок: ', q_int); readln end.
using System;
namespace ConsoleApp1
{
class Program
{
static void Main(string[] args)
{
int a, b, c;
Console.Write("Введите a: ");
a = Convert.ToInt32(Console.ReadLine());
Console.Write("Введите b: ");
b = Convert.ToInt32(Console.ReadLine());
Console.Write("Введите c: ");
c = Convert.ToInt32(Console.ReadLine());
if ((a+b<c)||(a+c<b)||(b+c<a)) Console.WriteLine("Такого треугольника не существует!");
else
{
if ((c*c==a*a+b*b)||(b*b==a*a+c*c)||(a*a==b*b+c*c))
Console.WriteLine("Треугольник существует. Он прямоугольный.");
else
Console.WriteLine("Треугольник существует. Он непрямоугольный.");
}
}
}
}