Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
некит434
2 / 2 / 0
Регистрация: 23.01.2014
Сообщений: 272
1

Вычислить квадрат среднего арифметического двух заданных вещественных чисел

26.01.2014, 15:11. Просмотров 867. Ответов 6
Метки нет (Все метки)

Вычислить квадрат среднего арифметического двух заданных вещественных чисел.
Входные данные:
Во входном потоке в первой строке задано два вещественных числа. Значения чисел по модулю не превышают 1 000 000 000.

Выходные данные:
Выходной поток вывести одно вещественное число с точностью три знака после запятой.

Пример входного файла (input.txt):
5.5 2.5
Пример выходного файла (output.txt):
16.000
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.01.2014, 15:11
Ответы с готовыми решениями:

Вычислить квадрат синуса среднего арифметического трех вещественных чисел
Вычислить квадрат синуса среднего арифметического трех вещественных чисел. ...

Вычислить квадрат суммы двух заданных вещественных чисел
Вычислить квадрат суммы двух заданных вещественных чисел. Входные данные:...

Вычислить квадрат разности модулей двух заданных вещественных чисел
Вычислить квадрат разности модулей двух заданных вещественных чисел. Входные...

Вычислить квадрат модуля округленной суммы двух заданных вещественных чисел.
Вычислить квадрат модуля округленной суммы двух заданных вещественных чисел....

Квадрат модуля округленной суммы двух заданных вещественных чисел
Квадрат модуля округленной суммы двух заданных вещественных чисел: write...

6
MaxioN03
4 / 4 / 5
Регистрация: 22.02.2013
Сообщений: 14
26.01.2014, 15:33 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var a,b,x,x1,y:real; g,f:text;
begin
assign(g,'input.txt');
assign(f,'output.txt');
reset(g);
rewrite(f);
read(g,a,b);
x:=sqr((a+b)/2);
x1:=trunc(x);
y:=x-x1;
y:=trunc(y*1000);
writeln(f,x1,'.',y);
close(f);
close(g);
end.
1
некит434
2 / 2 / 0
Регистрация: 23.01.2014
Сообщений: 272
26.01.2014, 15:39  [ТС] 3
а как без родсказок

Добавлено через 1 минуту
ошыбка вывода
надо без подсказок как это сделать

Добавлено через 1 минуту
assign(g,'input.txt');
assign(f,'output.txt');
reset(g);
rewrite(f);

rewrite это что
0
MaxioN03
4 / 4 / 5
Регистрация: 22.02.2013
Сообщений: 14
26.01.2014, 16:10 4
Это команды для файлов.
rewrite - значит разрешить вписывать данные в файл.
0
некит434
2 / 2 / 0
Регистрация: 23.01.2014
Сообщений: 272
26.01.2014, 16:14  [ТС] 5
а как это написать без подсказок
0
MaxioN03
4 / 4 / 5
Регистрация: 22.02.2013
Сообщений: 14
26.01.2014, 16:31 6
Здесь нету никак подсказок или комментариев. Только команды.
0
некит434
2 / 2 / 0
Регистрация: 23.01.2014
Сообщений: 272
26.01.2014, 16:52  [ТС] 7
Нарушение формата вывода
так пишыт
вот сдесь
http://yun.zp.ua/fpc/index.php?servi...1&subtheme=101

Добавлено через 17 минут
а 3 знака после запятой где
0
26.01.2014, 16:52
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.01.2014, 16:52

Вычислить среднее арифметическое двух заданных вещественных чисел
Вычислить среднее арифметическое двух заданных вещественных чисел. Входные...

Вычислить корень квадратный суммы двух заданных вещественных чисел a и b
Казалось бы легкие задачи, а не получается... Заранее огромное спасибо... ...

Вычислить корень квадратный суммы двух заданных вещественных чисел
Вычислить корень квадратный суммы двух заданных вещественных чисел a и b....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru