М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Анна3672
Анна3672
08.05.2022 07:40 •  Информатика

Написать программу (с program. var и тд) дано семизначное число. найти сумму,произведение и среднее арифметическое этих цифр

👇
Ответ:
rayhan8888
rayhan8888
08.05.2022
Var a,b,i,s,p:integer;
begin
readln(a);
s:=0; p:=1;
for i:=1 to 7 do
 begin
 b:=a mod 10;
 s:=s+b;
 p:=p*b;
 a:=a div 10;
 end;
writeln('s = ',s,' p = ',p,' sr = ',s/7:5:2);
end.

Пример:
1389546
s = 36 p = 25920 sr = 5.14
4,6(26 оценок)
Ответ:
MaxRozBerg
MaxRozBerg
08.05.2022
Программа прикреплена в приложении

Примеры:

Введите семизначное число: 4564564
Среднее арифметическое цифр числа: 4.85714

Введите семизначное число: 6535684
Среднее арифметическое цифр числа: 5.29

Введите семизначное число: 6563258
Среднее арифметическое цифр числа: 5.00
4,8(73 оценок)
Открыть все ответы
Ответ:
HateLove7
HateLove7
08.05.2022
Const n=15; 
var a:array[1..n] of integer;
i,s:integer; sr:real;
begin
Randomize;
writeln('Массив:');
for i:=1 to n do
 begin
 a[i]:=random(21);
 write(a[i]:3);
 end;
writeln;
s:=0;
for i:=1 to n do s:=s+a[i];
sr:=s/n;
writeln('Среднее арифметическое = ',sr:6:2);
writeln('Номера элементов, больших среднего арифметического:');
for i:=1 to n do
 if a[i]>sr then write(i:3);
writeln;
end.

Пример:
Массив:
  9 19 14 8 7 10 5 10 6 14 15 2 11 17 13
Среднее арифметическое = 10.67
Номера элементов, больших среднего арифметического:
  2 3 10 11 13 14 15
4,6(26 оценок)
Ответ:
VadAltman13
VadAltman13
08.05.2022

Минимальная единица изображения:

растровая: пиксели

векторная: графические формулы

Какая информация хранится в файлах векторного и раствого типа:

Ростовая: о пикселях, составляющих изображения.

Векторная: о графических примитивах, составляющих изображение.

С каких средств получается изображение:

растровая: Paint, Gipm, Adobe Photoshop

Векторная: Microsoft Word, OpenOffice, CorelDRAW , Macromedia Flash.

Объём графических файлов:

растровая: очень большой объём

Векторная: относительно небольшой объём

реакция изображения на изменение его размера:

Растровая: не желательно, возможно искажение.

Векторная: качество не будет потеряно, остаётся прежний вид.

Достоинства графики:

растровая: позволяет работать с фотореалестичными изображениями, простая ретушь и комбинация частей изображения, ввод сканера и и цифровыми камерами.

векторная: маленький объём файла, простое маштабирование.

Недостатки графики:

растровая: большой объём файла, маштабирование с искажением и ухудшение качества,

векторная: не пригодна для реалестичных изображений.

Форматы файлов:

растровая: BPM, GIF, JPG, PCX, TIF.

векторная: WMF, EPS, DXF, CCM

4,5(89 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ