Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal ABC Даны текстовые файлы f.txt и g.txt. Сравнить являются ли они равными https://www.cyberforum.ru/ pascalabc/ thread672501.html Даны текстовые файлы f.txt и g.txt. Сравнить являются ли они равными. Помогите пожалуйста.	Pascal ABC С начала суток прошло n секунд. Выведите, что покажут часы Электронные часы показывают время в формате h:mm:ss, то есть сначала записывается количество часов, потом обязательно двузначное количество минут, затем обязательно двузначное количество секунд. Количество минут и секунд при необходимости дополняются до двузначного числа нулями. С начала суток прошло n секунд. Выведите, что покажут часы. Вот примерное решение, но почему то не получается...
Pascal ABC Разность времен Здравствуйте, уважаемые программисты! помогите пожалуйста с задачкой! условие задачи - Даны значения двух моментов времени, принадлежащих одним и тем же суткам: часы, минуты и секунды для каждого из моментов времени. Известно, что второй момент времени наступил не раньше первого. Определите, сколько секунд прошло между двумя моментами времени. Программа на вход получает три целых числа — часы,... https://www.cyberforum.ru/ pascalabc/ thread672454.html	Pascal ABC Работа со строками https://www.cyberforum.ru/ pascalabc/ thread672449.html Помогите пожалуйста решить задачку. Дана непустая строка из строчных русских букв. Напечатать в алфавитном порядке все согласные буквы, не входящие в строку.
Для введенного целого числа вычислите произведение его цифр Pascal ABC Для введенного целого числа вычислите произведение его цифр	Pascal ABC Какие ограничения накладывает на переменную указанных для нее тип? https://www.cyberforum.ru/ pascalabc/ thread672435.html Какие ограничения накладывает на переменную указанных для нее тип?
Pascal ABC Найдите все ошибки в написание указанных операторов: READLN(Y+1;X); WRITELN("ВВЕДИТЕ ЧИСЛО"=5); READLN(5);X:=7DIV2 ORD Y; https://www.cyberforum.ru/ pascalabc/ thread672432.html	Графические элементы в Паскаль абс Pascal ABC Всем привет. В моем колледже мы пропускаем графическую часть Паскаля, а мне хотелось бы самостоятельно это освоить для дальнейшего написания простеньких игр. Сразу говорю, не надо мне советовать другие языки для игр. Я прошу помощи конкретно по графике в паскале, а именно: литературу какую-нибудь, ссылки на сайты, где все подробно рассказывается. А так же хотелось бы узнать, что необходимо знать...
Pascal ABC Укажите последовательность выполнения операций в произвольном выражении при отсутствии скобок Укажите последовательность выполнения операций в произвольном выражении при отсутствии скобок https://www.cyberforum.ru/ pascalabc/ thread672428.html	Pascal ABC Дайте определение зарезервированного (служебного) слова языка Дайте определение зарезервированного (служебного) слова языка https://www.cyberforum.ru/ pascalabc/ thread672422.html
Сформировать новый массив так, чтобы в начале шли положительные, потом нулевые и отрицательные Pascal ABC Разработать алгоритм в Паскале Сформировать массив чисел А, а затем из него получить новый массив В таким образом, чтобы в начале шли положительные элементы, потом нулевые и, наконец, отрицательные.	Pascal ABC Написать программу вычисления интеграла методом правых, левых и средних прямоугольников Написать программу вычисления интеграла методом правых, левых и средних прямоугольников. https://www.cyberforum.ru/ pascalabc/ thread672356.html

Ученик96

2 / 2 / 1

Регистрация: 15.10.2012

Сообщений: 16

Дан файл целых чисел. Подсчитать произведение чисел большее 5 - Pascal ABC - Ответ 3568118

16.10.2012, 17:01. Показов 1010. Ответов 2

Метки (Все метки)

Студворк — интернет-сервис помощи студентам

Pascal

program primer;
var fx: text;
s,c:integer;
begin
assign(fx,'F:\0001.txt');
reset (fx);
S:=0;
while not Eof(fx) do
begin
read (fx,c);
If c > 5 then S:=S*c;
end;
close (fx);
writeln('S=',S);
end.

Помогите пожалуйста, что то не работает.

Вернуться к обсуждению:
Дан файл целых чисел. Подсчитать произведение чисел большее 5 Pascal ABC

Следующий ответ

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

16.10.2012, 17:01

Готовые ответы и решения:

Дан файл вещественных чисел. Подсчитать среднее значение чисел большее 3
Файл уже заполнен. Не надо его заполнять на рандоме. Помогите пожалуйста.

Дан файл целых чисел. Подсчитать сумму чисел, больших числа N
program p1; var fx:text; s,k,n:real; c:integer; begin...

Дан файл вещественных чисел Создать файл целых чисел, содержащий номера локальных максимумов исходного файла
2-File. Дан файл вещественных чисел. Создать файл целых чисел, содержащий номера всех локальных...

Дан файл целых чисел. Создайте файл вещественных чисел, компонентами которого будут
Дан файл целых чисел. Создайте файл вещественных чисел, компонентами которого будут средние...

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

16.10.2012, 17:01

Помогаю со студенческими работами здесь

1) Подсчитать произведение и количество всех неотрицательных чисел из 10 не целых чисел, введенных пользовател
1) Подсчитать произведение и количество всех неотрицательных чисел из 10 не целых чисел, введенных...

Дан файл вещественных чисел. Создать файл целых чисел, содержащий номера всех локальных экстремумов исходного файла в порядке убывания
File22. Дан файл вещественных чисел. Создать файл целых чисел, содержащий номера всех локальных...

Дан файл целых чисел.Вывести кол-во содержащихся в нем чисел
Дан файл целых чисел.Вывести кол-во содержащихся в нем чисел

Дан файл состоящий из целых чисел. Создать новый файл целых чисел, содержащий длины всех серий исходного файла
Дан файл целых чисел. Создать новый файл целых чисел, содержащий длины всех серий исходного файла...

Наверх