сервис вопросов и ответовпрочитайте из файла f1 все числа найдите их произведение результат выведите в файл f2
10-11 класс|
|
Светлана20123
06 авг. 2014 г., 22:51:03 (9 лет назад)
Jfri
06 авг. 2014 г., 23:45:34 (9 лет назад)
var a,s:real;
f1,f2:text;
begin
assign(f1,'f1.txt');
reset(f1);
assign(f2,'f2.txt');
rewrite(f2);
s:=1;
while not eof(f1) do
begin
read(f1,a);
s:=s*a;
end;
write(f2,s);
close(f1);
close(f2);
end.
Ответить
Другие вопросы из категории
30 пунктов!!!Паскль.найдите ошибку и объясните, пожалуйста!!умоляю, ребят!
Подсказка: ошибка связана с "writeln"
Здравствуйте) Помогите составить программу вычисления значений функции в VBA, заданных несколькими условиями с использованием условного
оператора If.... Then.... Else... , никак не даётся(((
15. Определите
результат выполнения программы:
var
i, sum: integer;
1)Строение задачи на паскаль.
2) условный оператор
3)цикл с предусловием
Читайте также
Задача Z. Угадай число
Имя входного файла: стандартный ввод
Имя выходного файла: стандартный вывод
Ограничение по времени: 2 секунды
Ограничение по памяти: 256 мегабайт
Это интерактивная задача. В процессе тестирования ваша программа будет взаимодействовать
с программой жюри с использованием стандартных потоков ввода/вывода.
Программа жюри загадала число от 1 до n, цель вашей программы — отгадать его. Для этого
ваша программа сообщает свои догадки программе жюри, а программа жюри отвечает, является
ли загаданное число большим, меньшим или равным сделанной догадке.
Выполнено неравенство 1 ≤ n ≤ 109
. Ваша программа должна сделать не более 30 догадок.
Протокол взаимодействия с программой жюри
Сначала ваша программа должна прочитать из стандартного потока ввода число n. Затем
протокол общения следующий: ваша программа выводит в стандартный поток вывода одну строку,
содержащую число — свою догадку о загаданном числе. Делайте сброс буфера потока вывода после
каждой догадки. Для этого используйте
• flush(output) в паскале или Delphi;
• fflush(stdout) или cout.flush() в С/C++;
• System.out.flush() в Java.
• sys.out.flush() в Python.
После этого программа должна считать из стандартного потока ввода одно число: ответ
программы жюри. Возможны следующие ответы:
• 1 — загаданное число больше последней догадки;
• −1 — загаданное число меньше последней догадки;
• 0 — последняя догадка верна. Считав 0, ваша программа должна завершиться.
Пример
стандартный ввод стандартный вывод
5
-1
1
0
3
1
2
Для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты. Если все числа не превышают 30, то выведите их
удвоенное произведение. Если последнее число четно, то выведите произведение первых двух чисел, уменьшенное в 10 раз. Если выполняются одновременно 2 условия, то выведите эти числа без изменения. Иначе, выведите разность первого и последнего чисел.
Решить нужно в С или С++
Заранее спасибо!!!
Для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты. Если все числа не превышают 30, то выведите их
удвоенное произведение. Если последнее число четно, то выведите произведение первых двух чисел, уменьшенное в 10 раз.
Решить нужно на среде С или С++
Заранее спасибо.
Натуральное число из n цифр является числом Армстронга, т.е сумма его цифр возведенная в n степень равна самому числе. ( 153=1*1*1+5*5*5+3*3*3) Получите
все числа Армстронга для n=4 n=3?
Дешифруйте следующие двоичные числа, преобразовав их в десятичные: 0010, 1011, 11101, 0111, 0101.Дешифруйте следующие восьмеричные числа, преобразовав их
в десятичные: 777, 375, 111, 1015.Дешифруйте следующие шестнадцатеричные числа, преобразовав их в десятичные: 15, A6, 1F5, 63.
Вы находитесь на странице вопроса "прочитайте из файла f1 все числа найдите их произведение результат выведите в файл f2", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.