Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
0 / 0 / 0
Регистрация: 29.10.2014
Сообщений: 13
1

Составить блок-схему

30.10.2014, 09:14. Показов 284. Ответов 0
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Program ex1;
Var n,i,k,z:integer;
    y,l:real;
Begin
Writeln('Ведите N');
Readln(n);
y:=1; z:=2; k:=-1; l:=81;
For i:=1 to n do
 Begin
  y:=y*(z+k/l);
  z:=z*2;
  k:=-k;
  l:=l/3;
 End;
Writeln(y);
End.
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
30.10.2014, 09:14
Ответы с готовыми решениями:

Составить блок схему вычисления значения функции, а затем составить программу
Составить блок схему вычисления значения функции, а затем составить программу

Составить блок - схему
program pow; var x: real; n: integer; begin write('n = '); readln(n); if odd(n) then...

Составить блок схему
Дана действительная матрица размера m X n. Найти среднее арифметическое наибольшего и наименьшего...

Составить блок схему
Помогите пожалуйста составить блок-схему к данной задаче: Дано натуральное число n. Выяснить,...

0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
30.10.2014, 09:14

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Составить блок-схему
uses crt; const n=3; var a:array of real; b:array of real; i,j,ko:byte; s,s1:real; begin...

Составить блок схему
Даны натуральное число n, действительная матрица A n x n. Найти Среднее арифметическое каждого из...

Составить блок-схему
uses crt; type pnode=^node; node = record d : char; p : pnode; ...

Составить блок-схему
Нужно составить блок-схему к задаче. 1 Var a:real; 2 Begin 3 p:=1; 4 For i:=1 to n do 5 if...

Составить блок-схему
Составить блок-схему. ( программа ) \begin{cases}2\sqrt{x^2+15} & \text{ npu } x\,<\,-6 \\\\...

Составить блок-схему
program EX_1; uses crt; var a:arrayof integer; N,i,min,max:integer; begin write('размер...


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

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

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