В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Павлик8089
Павлик8089
24.06.2021 09:54 •  Информатика

Информатика 7 класс самостоятельная работа быстрей​


Информатика 7 класс самостоятельная работа быстрей​

Показать ответ
Ответ:
boss23242
boss23242
16.07.2020 09:03
Что тут расшифровывать то? 
1)Процессор Intel Pentium с тактовой частотой 3.4GHz, объем оперативной памяти 2Гб, внешний накопитель на 300Гб, видеокарта GeForce 7600GS с видеопамятью 256 Мб, есть слот для дисков DVD±RW, наличие звуковой карты, наличие порта для интернета, блок питания на 430В.
2)Процессор Intel Celeron с тактовой частотой 3.1GHz, 512Мб оперативной памяти, 200Гб внешнего накопителя, видеокарта GeForce 7300LE, FDD вероятнее всего HDD(устройство внешней памяти), наличие инструмента для чтения дисков DVD, наличие звуковой карты, возможность подключение к интернету по проводу, блок питания на 350В
0,0(0 оценок)
Ответ:
1234567890dd
1234567890dd
27.08.2022 00:29
1)
Var
n,m,max,min:integer;
Begin
write('Введите число: ');
readln(n);
min:=9;   
max:=0;
while n>0 do 
begin 
m:=n mod 10; 
if m<min then min:=m; 
if m>max then max:=m; 
n:=n div 10; end;   
writeln('Максимальное число: ',max);   
writeln('Минимальное число: ',min);
End.
2)
var
i,count: integer;
n,s:string;
begin
writeln('Введите число: ');
readln(s);
writeln('Введите цифру: ');
readln(n);
for i:=1 to length(s) do
if(s[i]=n)then
count:=count+1;
writeln('Количество раз, когда встречается цифра = ',count);
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота