30*32=960-строчек всего
960*62=59520-символов всего
59520*8=476160-кб 1 книга
<span>476160*3=1428480-3 книги в кб
примерно так ,у меня похожее задание было </span>
<em>Байкал</em>, озеро.
<em>Местонахождение</em>: юг Восточной Сибири.
<em>Размеры</em>: длина 636 км, ширина 80 км, площадь 31 722 км², объем 23 615,390 км³, длина береговой линии примерно 2 100 км, глубина 1642 м.
<em>Водный бассейн</em>: впадают 336 рек (в том числе Селенга, Верхняя Ангара, Баргузин). Вытекает только Ангара.
Пуск- программы- стандартные- Левая кнопка мыши- Paint
// PascalABC.NET 3.1, сборка 1239 от 08.05.2016
begin
var m:=ReadInteger(‘Число строк=’);
var n:=ReadInteger(‘Число стролбцов=’);
var a:=MatrixRandom(m,n,-99,99);
var imax:=-1; var jmax:=0;
var imin:=0; var jmin:=0;
var min:=100; var max:=-100; // больше большего, меньше меньшего
for var i:=0 to m-1 do begin
for var j:=0 to n-1 do begin
Write(a[i,j]:4);
if (a[i,j]>0) and (a[i,j] mod 2=0) then begin
if a[i,j]<min then begin imin:=i; jmin:=j; min:=a[i,j] end;
if a[i,j]>max then begin imax:=i; jmax:=j; max:=a[i,j] end
end
end;
Writeln
end;
if imax<>-1 then begin
Writeln(‘Минимальный четный положительный элемент A[‘,
imin+1,’,’,jmin+1,’]=’,a[imin,jmin]);
Writeln(‘Максимальный четный положительный элемент A[‘,
imax+1,’,’,jmax+1,’]=’,a[imax,jmax])
end
else
Writeln(‘В массиве нет положительных четных элементов’)
end.
<u><em>Тестовое решение</em></u>
Число строк= 5
Число стролбцов= 8
-59 98 55 -92 -98 68 5 -82
63 49 41 7 51 22 55 -4
-78 42 -35 -60 -6 -15 -34 -28
-14 55 -44 22 74 -50 -98 85
50 2 65 39 -47 -59 -7 -87
Минимальный четный положительный элемент A[5,2]=2
Максимальный четный положительный элемент A[1,2]=98
<span>a := 27
b := a mod 10 — 4 = 7-4=3
a := b + 11 =3+11=14
b := a mod 5 — 1 =4-1= 3
Ответ: 3</span>
Вася Иванов
Мореплаватель — имя существительное, употребляется в мужском роде. К нему может быть несколько синонимов.
1. Моряк. Старый моряк смотрел вдаль, думая о предстоящем опасном путешествии;
2. Аргонавт. На аргонавте были старые потертые штаны, а его рубашка пропиталась запахом моря и соли;
3. Мореход. Опытный мореход знал, что на этом месте погибло уже много кораблей, ведь под водой скрывались острые скалы;
4. Морской волк. Старый морской волк был рад, ведь ему предстояло отчалить в долгое плавание.
Ответ оставил Гость
1. Переменная c=4,75. 4,75 — это дробь. Но переменная c задана как integer, т.е. целое число.
2. abs(x) — возвращает модуль числа x
sqr(x) — возведение в квадрат числа x
sqrt(x) — вычисление квадратного корня из числа x
random(x) — генерирование случайного числа в промежутке (0;X)
Оцени ответ
Найдите ошибку в программе.
Program al ;
var c : integer ;
begin
c : 4, 75
writeln (, c = , c)
end.
Вопрос Найдите ошибку в программе?, расположенный на этой странице сайта, относится к
категории Информатика и соответствует программе для 5 — 9 классов. Если
ответ не удовлетворяет в полной мере, найдите с помощью автоматического поиска
похожие вопросы, из этой же категории, или сформулируйте вопрос по-своему.
Для этого ключевые фразы введите в строку поиска, нажав на кнопку,
расположенную вверху страницы. Воспользуйтесь также подсказками посетителей,
оставившими комментарии под вопросом.
Найдите ошибку в программе.
program al;
var c: integer;
begin
c:4,75
writeln (,c=,c)
end.
Остались вопросы?
Новые вопросы по предмету Информатика