Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Soldszar
0 / 0 / 1
Регистрация: 01.05.2010
Сообщений: 12
#1

Создайте две блок схемы

15.05.2010, 00:22. Просмотров 360. Ответов 2
Метки нет (Все метки)

Задача №1
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Var 
a:array [1..10,1..15] of integer;
s,i,j:integer;
begin
   randomize;
   for i:=1 to 10 do
   for j:=1 to 15 do
   a [i,j]:=random(30);
   for i:=1 to 10 do
begin
   for j:=1 to 15 do
   write (a[i,j]:4);
   writeln;
end;
   s:=0
   for i:=1 to 10 do
   for j:=1 to 15 do
   if a[i,j] mod 2=1 then
   s:=s+a[i,j];
   writeln(s);
   readln;
end.
Задача №2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var x1,x2,y1,y2,dl:real;
procedure pr_dl(x1,y1,x2,y2:real; var dl:real);
begin
  dl:=sqrt(sqr(x2-x1)+sqr(y2-y1));
end;
begin
  writeln('Введите координаты точки x1,y1');
  readln(x1,y1);
  writeln('Введите координаты второй точки x2,y2');
  readln(x2,y2);
  pr_dl(x1,y1,x2,y2,dl);
  writeln('Расстояние мжду точками равно ',dl:10:3);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
15.05.2010, 00:22
Ответы с готовыми решениями:

Создайте Блок схему а то у меня не получается
uses crt; var f,g:file of longint; n,a,b,i,p:longint; m:set of byte;...

Блок схемы
Помогите пожалуйста составить блок схемы для 2ух программ: Program Massiv;...

Блок-схемы
Требуется блок-схемы к двум программам. program Project1; uses crt; const ...

Блок-схемы
Как составить блок схему???подскажите плизззззззззззззз program 3; uses crt;...

блок схемы
Доброго времени суток, нужна помощь в написании блок схемы. Задача вот в чем......

2
Angel-dm
112 / 109 / 33
Регистрация: 21.12.2009
Сообщений: 321
15.05.2010, 08:41 #2
Вот схемы сначало для первого кода потом для второго:
Создайте две блок схемы

А тут в архивах их приблизить можно:
Program.rar
1
Angel-dm
112 / 109 / 33
Регистрация: 21.12.2009
Сообщений: 321
15.05.2010, 08:44 #3
Вот для второго:
Название: pr_dl.jpg
Просмотров: 13

Размер: 7.4 Кб
и
Создайте две блок схемы

И так же архивы:
pr_dl.rar
и
Program.rar
Не забудь отметить (+1)
_______ANGEL-DM_______
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
15.05.2010, 08:44

блок-схемы
моготи если можно нарисовать блок схеми к прогам а то я не очень то умею ето...

блок-схемы
помогите сделать блок схемы по данным кодам в паскале: 1.uses crt; var...

Блок схемы
Добрый день! Помогите нарисовать блок-схемы 1. Program Man; Const N=5;...


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

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

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