| Автор | Универ. Контрольная по эвм. |
|---|
program 1_variant;
var;
a,b,i,summa:byte;
begin
readln(a,b);
result:=0;
if b<a then begin
I:=I+1;
until i<=b;
end;
Writeln("Результат равен:",resultat);
end.
Программа должна вычислять произведения целых чисел от A до B, причем(a>b) и выводить результат. Найдите ошибки в коде программы и исправьте их.
Составить блок-схему алгоритма обработки одномерного массива размерностью N.
Найти наименьший из положительных элементов массива и вывести его на экран.
Вот такие две несложные задачки, казалось бы. Тем, кто помог вышлю в качестве презента артефакты всякие. |
I:=I+1;
Исправлять не буду - но это не произведение. |
2+. То есть a и b умножить бы как я понимаю там и в resultat положить.
как то так.
lf b until i<=b; какой ито странный как завершение проги. |
Если это язык C, то регистр букв в переменных имеет значение.
Тут у I он разный.
Переменная I не инициализирована.
В тип Byte влезут не все числа, мягко говоря.
Нет самой операции умножения с присвоением значения result.
result и resultat записаны по разному.
Цикл не запустится, потому что условие "if b<a then", а в описании a>b.
Это навскидку, может и еще что-то есть.
Но вообще хотя бы язык указал. |
| Паскаль, вероятно. |
Но вообще хотя бы язык указал
Со своей стороны могу сказать, что точно не финский. |
| да. турбопаскаль это. |
| Прикольный у вас универ, я на паскале еще в 8 или 9 классе кодил. |
я на паскале еще в 8 или 9 классе кодил.
всего то прошло 2 года) |
1) if b<a then begin
2) a,b,i,summa:byte; |
Паскаль, вероятно.
какой паскаль, ты что не видишь тут же чистейший бойль-мариотт |
| Тебе военком поможет инфа 100-ка, но потом ты не представляешь как ты поможешь ему. |
для Принц Империи:
вышлю в качестве презента артефакты всякие.
Тесак охотника? |
для Foenstein:
Ты что в ОИФ?
Артефакт — в археологии — объект, подвергнутый в прошлом направленному механическому воздействию, обнаруженный в результате целенаправленных археологических раскопок или какого-либо единичного, иногда случайного события. Примерами артефактов являются каменные инструменты, ювелирные изделия, оружие, керамика, постройки и их детали, угли древнего костра, кости, имеющие следы воздействия человека и др. Артефакты изучаются археологами, которые производят раскопки археологических памятников, исследуют и публикуют находки и результаты раскопок и восстанавливают по этим данным историческое прошлое человечества. Ценные с точки зрения науки или искусства артефакты демонстрируются в музеях и на выставках.
Я думаю что ТС грабанул какой то музей |
для Zael_Hell:
ТС грабанул какой то музей
а почтовые расходы кто оплачивать будет? |
для Foenstein:
Это уже не его проблемы. |
| Судя по всему, в армии дворников прибудет тс-ом. |
