Ответы на вопрос:
var
a: real;
begin
write('введите число '); readln(a);
if (frac(a) = 0) and( trunc(a) mod 5 = 0) then
writeln('число ', a ,' кратно 5')
else
writeln('число ', a ,' некратно 5')
end.
// pascalabc.net 3.3, сборка 1573 от 04.11.2017 // внимание! если программа не работает, обновите версию! begin var n: =readinteger('количество строк в матрице: '); var m: =9; writeln('*** исходная матрица ***'); var a: =new real[n,m]; randomize; for var i: =0 to n-1 do for var j: =0 to m-1 do a[i,j]: =random(-100,100)/10; a.println(5,1); writeln(5*a.colcount*'-'); var col: =1; write('средние арифметические: '); while col< =m-1 do begin write(a.col(col).average: 0: 2,' '); col+=2 end; writeln end. пример количество строк в матрице: 6 *** исходная матрица *** 9.6 -4.5 0.2 -7.6 5.4 -4.8 -0.1 -8.6 9.3 -3.6 -3.3 -4.6 -4.6 -2.0 -7.3 5.4 5.1 -9.3 3.2 1.0 -8.1 -5.9 -6.1 9.8 -0.7 -2.5 -1.5 -3.0-10.0 -7.4 -6.7 9.6 -2.1 9.3 -4.6 -3.8 9.7 -7.8 3.1 0.9 -3.0 5.4 9.7 2.9 -9.6 -3.3 4.4 -1.7 -5.0 8.5 0.9 -3.9 -3.4 1.3 средние арифметические: -3.37 -4.82 0.32 -1.85
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
bdoyan199427.07.2020 01:20
-
viktoriakruminaВика10.02.2021 17:01
-
Лиана89127.10.2022 15:36
-
chorna20217.08.2021 07:57
-
Fantik14rus28.01.2020 16:07
-
Spanny9918.03.2021 15:50
-
daniil32622.10.2022 03:01
-
Алима2004107.03.2020 16:50
-
Patsanchik99901.12.2022 15:55
-
yaprettylittle03.06.2023 12:12
![Caktus Image](/tpl/img/cactus.png)
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.