5 / 5 / 1
Регистрация: 15.10.2013
Сообщений: 206
1

Программа выводит неправильные результаты

27.11.2013, 12:10. Показов 497. Ответов 2
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
program d;
uses crt;
var
a:array[1..100000] of integer;
s:real;
i,n,k: integer;
begin
randomize;
writeln('Введите размер массива');
readln(n);
if n> 100000 then writeln('Превышен допустимый размер массива');
writeln('Массив');
for i:=1 to n do
begin
a[i]:=-100+random(201);
writeln(a[i]);
end;
writeln('Введите К');
readln(k);
s:=0;
if a[i] mod k=0
then s:=s+a[i];
write('s=');
write(s);
end.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
27.11.2013, 12:10
Ответы с готовыми решениями:

Программа делает неправильные расчеты
Программа вроде работает, но делает неправильные расчеты. program kursova22; uses...

Паскаль выводит разные результаты
Ребята, просто мистика какая-то. Запускал программу утром дома, она выводил верный результат....

Составить программу, которая вводит строку символов, выполняет ее обработку и затем выводит результаты
Составить программу, которая вводит строку символов, выполняет ее обработку и затем выводит...

Программа выводит неправильные числа
короче у меня вопрос: #include <stdio.h> #include <conio.h> void main() { int x;...

2
Почетный модератор
64238 / 47538 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
27.11.2013, 12:22 2
Вставьте после строки 20
Pascal
1
for i:=1 to n do
1
5 / 5 / 1
Регистрация: 15.10.2013
Сообщений: 206
27.11.2013, 12:32  [ТС] 3
аналогичная проблема с этой программой
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
program Lab3;
uses crt;
var
D:array[1..100000] of integer;
s1,s2,s3,n,i:integer;
chislo:integer;
begin
randomize;
writeln('Ââåäèòå ðàçìåð ìàññèâà');
readln(n);
if n> 100000 then writeln('Ïðåâûøåí äîïóñòèìûé ðàçìåð ìàññèâà');
writeln('Ìàññèâ');
for i:=1 to n do
begin
d[i]:=-100+random(201);
writeln(d[i]);
s1:=D[1]+D[2]+D[3]; 
s2:=D[3]+D[4]+D[5]; 
s3:=D[5]+D[6]+D[7];
 
write('s1=');
writeln(s1);
 
write('s2=');
writeln(s2);
 
write('s3=');
writeln(s3);
end;
end.
Добавлено через 5 минут
на выходе предоставляется количество решений равное размерности массива
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.11.2013, 12:32
Помогаю со студенческими работами здесь

Программа не заполняет первую таблицу. А во второй выводит неправильные значения
Здравствуйте. Программа не заполняет первую таблицу. А во второй выводит неправильные значения....

Программа делает расчеты и выводит результаты на экран
К примеру, пользователю необходимо ввести 5 чисел (каждое число в отдельное окошко), а программа...

Программа делает нужные расчеты и выводит результаты на экран
Здравствуйте, я студент первого курса, и на хорошо сдал зачет по программированию, но пока что нас...

Неправильные результаты математических функций
#include <stdio.h> #include <math.h> #include <conio.h> int main() { //const float PI =...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru