помогите решить еще задачу - Помощь студентам

Анастасия19 · 03.01.2015, 16:21

дан массив из n элементов. Определить, сколько раз встречается число 7 среди элементов массива.Заменить эти значения на 0.

Stilet · 03.01.2015, 17:03

Код:

const 
 n=1;
var c,i:integer; a:array[1..n] of integer;
begin
 for i:=1 to n do begin a[i]:=i; if a[i]=7 then begin inc(c); a[i]:=0; end; write(a[i]:5);end;
 readln;
end.

Анастасия19 · 03.01.2015, 17:26

спасибо!!!!

03.01.2015, 16:21	#1
Анастасия19 Пользователь Регистрация: 03.01.2015 Сообщений: 12	помогите решить еще задачу дан массив из n элементов. Определить, сколько раз встречается число 7 среди элементов массива.Заменить эти значения на 0.

03.01.2015, 17:03	#2
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Код: `const n=1; var c,i:integer; a:array[1..n] of integer; begin for i:=1 to n do begin a[i]:=i; if a[i]=7 then begin inc(c); a[i]:=0; end; write(a[i]:5);end; readln; end.` I'm learning to live...

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
помогите решить задание на массив и еще одно	gurman9	Microsoft Office Excel	1	18.11.2014 00:31
Помогите пожалуйста решить еще одни задачки по Паскалю!)	tyt1991	Паскаль, Turbo Pascal, PascalABC.NET	5	28.04.2009 19:56
Помогите пожалуйста решить еще одни задачки по Паскалю!)	tyt1991	Паскаль, Turbo Pascal, PascalABC.NET	0	28.04.2009 12:48
Нужно решить еще задачу в паскале! Срочно	Lenochka082	Помощь студентам	4	19.01.2009 16:26

03.01.2015, 17:26	#3
Анастасия19 Пользователь Регистрация: 03.01.2015 Сообщений: 12	спасибо!!!!