Перейти к содержимому

PRO_Grizli

PRO_Grizli

Регистрация: 06.03.2011, 21:53
Offline Активность: 24.06.2011, 21:38
-----

#16024190 Программист(-ы) ищет работу

Опубликовал: PRO_Grizli 30.04.2011, 22:15:03

я студент первого курса, мы проходим паскаль, с этим проблем нет, пока что все гладко, нам дали задание составить псевдокод к программе своей... я программу написал а код немогу! в общем я совсем чайник в програмировании)
  • -1


#16023848 Программист(-ы) ищет работу

Опубликовал: PRO_Grizli 30.04.2011, 21:26:50

не соображаю я как эти псевдокоды пишутся... вроде просто ключевые слова на русский переводиш, так нет! есть правила какие то... может кто поможет? если не трудно) пожалуйста помогите!!! очень надо...
  • -1


#16002278 Программист(-ы) ищет работу

Опубликовал: PRO_Grizli 28.04.2011, 19:35:15

есть люди которые могут написать псевдокод для паскалевской программки простенькой? надо срочно очень! кому не трудно? вот текст программы:
program task_1_12;
const N=5;
var a, c: array[1..N,1..N] of real;
temp: real;
i, j, i1, i2: integer;
S: real;
begin
writeln;
writeln('Vvedite elementy matrisy A razmerom ',N,'x',N);
for i:=1 to N do
for j:=1 to N do
read(a[i,j]);
writeln;
writeln('Vvedite nomera strok: ');
readln(i1,i2);
for j:=1 to N do
begin
temp:=a[i1,j];
a[i1,j]:=a[i2,j];
a[i2,j]:=temp;
end;
{preobrazovannaya matrisa A}
writeln('preobrazovannaya matrisa A');
for i:=1 to N do
begin
for j:=1 to N do
write(a[i,j]:5:2);
writeln;
end;
{formiruem matrisy C}
writeln('matrisa C');
for i:=1 to N do
begin
for j:=1 to i do
begin
c[i,j]:=a[i,j];
write(c[i,j]:5:2);
end;
writeln;
end;
{vychislyaem summu pologitelnyx elementov}
S:=0;
for i:=1 to N do
for j:=1 to i-1 do
if (c[i,j]>0) then S:=S+c[i,j];
writeln('S=',S:6:2);
writeln;
end.
  • -1


Размещение рекламы на сайте     Предложения о сотрудничестве     Служба поддержки пользователей

© 2011-2022 vse.kz. При любом использовании материалов Форума ссылка на vse.kz обязательна.