Надо написать программу решения арифметического среднего трех чисел. Паскаль abc. Помогите, пожалуйста))
Ответы
Ответ дал:
0
var a,b,c: integer;
begin
writeln('Введите a,b,c: ');
readln(a,b,c);
writeln('Среднее арифметическое = ',(a+b+c)/3);
end.
begin
writeln('Введите a,b,c: ');
readln(a,b,c);
writeln('Среднее арифметическое = ',(a+b+c)/3);
end.
Ответ дал:
0
Вот как будет на C#..
int a, b, c;
string value;
double z;
Console.WriteLine("Введите первое число");
value = Console.ReadLine();
a = Convert.ToInt32(value);
Console.WriteLine("Введите второе число");
value = Console.ReadLine();
b = Convert.ToInt32(value);
Console.WriteLine("Введите третье число");
value = Console.ReadLine();
c = Convert.ToInt32(value);
z = (a + b + c) / 3;
Console.WriteLine("Среднее арифметическое = " + z);
Console.ReadKey();
int a, b, c;
string value;
double z;
Console.WriteLine("Введите первое число");
value = Console.ReadLine();
a = Convert.ToInt32(value);
Console.WriteLine("Введите второе число");
value = Console.ReadLine();
b = Convert.ToInt32(value);
Console.WriteLine("Введите третье число");
value = Console.ReadLine();
c = Convert.ToInt32(value);
z = (a + b + c) / 3;
Console.WriteLine("Среднее арифметическое = " + z);
Console.ReadKey();
Вас заинтересует
2 года назад
2 года назад
8 лет назад
8 лет назад
10 лет назад
10 лет назад
10 лет назад