|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
Вычислить значение F
на фото помогите пожалуйста заранее спасибо
|
#2
|
||||
|
||||
Хм... Как-то так:
Код:
program Project1; {$APPTYPE CONSOLE} uses SysUtils; function fact(n:int64):int64; begin if (n=1) or (n=0) then fact:=1 else fact:=fact(n-1)*n; end; var m,k,l:int64; f:int64; begin WriteLn('m?'); ReadLn(m); WriteLn('k?'); ReadLn(k); WriteLn('l?'); ReadLn(l); f:=fact(l)*(fact(m)-fact(k)); WriteLn('F=',f); ReadLn; end. Некоторые программисты настолько ленивы, что сразу пишут рабочий код. Если вас наказали ни за что - радуйтесь: вы ни в чем не виноваты. Последний раз редактировалось Aristarh Dark, 07.05.2021 в 11:57. |
#3
|
|||
|
|||
Спасибо большое, только к этому заданию нужна блоксхема можете показать как она выглядит в этом задании ?
|
#4
|
|||
|
|||
введи в гугле "блок схема алгоритма" и посмотри картинки как их рисовать.
В твоем случае. Для общей программы: Код:
-------- ( Начало ) -------- | ------------- / Ввод m,k,l / ------------- | ------------------ | Вычисление | | f = (m!-k!)*l! | ------------------ | --------- / Вывод f ) \ ) --------- | ------- ( Конец ) ------- Блок схема вычисления факториала (функции) обычно приводится отдельно. Пример можно найти тут: http://smiuk.sfu-kras.ru/kodnyanko/s.../5/AlgLab5.htm |
#5
|
|||
|
|||
Необходимо вставить в ячейки таблицы StringGrid определенные значения.
Пытаюсь это сделать через StringGrid.cells[i,y]:='proba', Программа все проходит, но значения в таблице не появляются. Подскажите в чем дело. |
#6
|
|||
|
|||
StringGrid это тебе не Excel. Там сначала надо выставить кол-во строк и столбцов. Хотя странно, вроде, если нужная ячейка находится за границей созданных, должно падасть с исключением...
|