0 / 0 / 0
Регистрация: 30.11.2013
Сообщений: 3

Подскажите где ошибка. Выдаёт арифметическое переполнение?

01.12.2013, 05:10. Показов 782. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
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 z1;
USES crt;
const N= 10;
var x: array [1..N] of integer; i: integer;
y: array [1..N] of integer;
begin
ClrScr;
randomize;
for i:= 1 to N do
begin
x[i]:= random(5+1)-2*5;
end;
for i:= 1 to n do
begin
write (' ',x[i],' ' );
end;
for i:= 1 to n do
begin
if x[i]<0 then Y[i]:=x[i]*x[i] else y[i]:=x[i];
end;
writeln;
for i :=1 to n do
write(' ',y[i],' ');
readkey;
end.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
01.12.2013, 05:10
Ответы с готовыми решениями:

Вычислить сумму ряда (Ошибка, переполнение. Где?)
Вычисление суммы ряда. Program fuuuuu; Const e=0.0001; Var a,s,f,x:real; k:integer; Function F1(n:real;m:byte):real; Var...

Переполнение плавающей точкой. Где ошибка в программе?
Program U2ITELb; Uses graph, crt; Const w1:real=1e8; w:real=1e7; l:real=0.2; w0:real=2e-8;{sobsvetna chastota...

Арифметическое переполнение
Ребят, пишет &quot; Арифметическое переполнение &quot;, в чем ошибка?program lab04; //------------------------------ uses crt; procedure lab4; ...

1
4 / 4 / 5
Регистрация: 01.03.2013
Сообщений: 180
01.12.2013, 09:26
Ошибки в программе нет, так же как и смысла. У Вас массив X содержит только отрицательные элементы, т.е. массив Y содержит квадраты X.
в цикле присвоения массиву X напишите
Pascal
1
x[i] := random(21)-10;
т.е. случайные числа в диапазоне от -10 до 10
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
01.12.2013, 09:26
Помогаю со студенческими работами здесь

Арифметическое переполнение
У меня проблема: все программы выдают арифметическое переполнение. В универе дали методичку перевести паскаль в асм, но проблема в том что...

Арифметическое переполнение
Арифметическое переполнение в чем проблема не могу понять помогите const nn=16; type mas=array of integer; var a:mas; n,k:integer; ...

подскажите где ошибка
var i,n0,n1:integer; begin write('Введите начальное значение периода: ');readln(n0); write('Введите конечное значение...

подскажите где ошибка
Добрый день. Подскажите пожалуйста где ошибка. когда вводишь любое число програама выводит результат, но при попытке ввести 0 выдает ошибку...

подскажите где ошибка?
Program q; var a,b:integer; begin readln (a); readln (b); if...


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

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

Новые блоги и статьи
Аутентификация OAuth в Python
py-thonny 22.05.2025
OAuth (Open Authorization) — это целый стандарт для делегированного доступа. Звучит занудно? Давайте проще: OAuth позволяет приложениям получать доступ к информации пользователя на сторонних сервисах. . .
Хеширование и соль паролей в веб-приложениях C#
stackOverflow 22.05.2025
Когда-то в начале своей карьеры я тоже грешил простейшими подходами к хранению паролей – MD5-хеширование казалось верхом защиты. Но технологии не стоят на месте, вычислительные мощьности растут, и. . .
Генераторы Python для эффективной обработки данных
AI_Generated 21.05.2025
В Python существует инструмент настолько мощный и в то же время недооценённый, что я часто сравниваю его с тайным оружием в арсенале программиста. Речь идёт о генераторах — одной из самых элегантных. . .
Чем заменить Swagger в .NET WebAPI
stackOverflow 21.05.2025
Если вы создавали Web API на . NET в последние несколько лет, то наверняка сталкивались с зелёным интерфейсом Swagger UI. Этот инструмент стал практически стандартом для документирования и. . .
Использование Linq2Db в проектах C# .NET
UnmanagedCoder 21.05.2025
Среди множества претендентов на корону "идеального ORM" особое место занимает Linq2Db — микро-ORM, балансирующий между мощью полноценных инструментов и легковесностью ручного написания SQL. Что. . .
Реализация Domain-Driven Design с Java
Javaican 20.05.2025
DDD — это настоящий спасательный круг для проектов со сложной бизнес-логикой. Подход, предложенный Эриком Эвансом, позволяет создавать элегантные решения, которые точно отражают реальную предметную. . .
Возможности и нововведения C# 14
stackOverflow 20.05.2025
Выход версии C# 14, который ожидается вместе с . NET 10, приносит ряд интересных нововведений, действительно упрощающих жизнь разработчиков. Вы уже хотите опробовать эти новшества? Не проблема! Просто. . .
Собеседование по Node.js - вопросы и ответы
Reangularity 20.05.2025
Каждому разработчику рано или поздно приходится сталкиватся с техническими собеседованиями - этим стрессовым испытанием, где решается судьба карьерного роста и зарплатных ожиданий. В этой статье я. . .
Cython и C (СИ) расширения Python для максимальной производительности
py-thonny 20.05.2025
Python невероятно дружелюбен к начинающим и одновременно мощный для профи. Но стоит лишь заикнуться о высокопроизводительных вычислениях — и энтузиазм быстро улетучивается. Да, Питон медлительнее. . .
Безопасное программирование в Java и предотвращение уязвимостей (SQL-инъекции, XSS и др.)
Javaican 19.05.2025
Самые распространёные векторы атак на Java-приложения за последний год выглядят как классический "топ-3 хакерских фаворитов": SQL-инъекции (31%), межсайтовый скриптинг или XSS (28%) и CSRF-атаки. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru