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

Работаем в pascal abc 1. найти количество цифр меньше 6 в целом x. тест: 254904 - 5 2. найти сумму первой и последней цифры в целом x. тест: 254904 - 6 3. найти сумму самой большой и самой маленькой цифры в целом x тест: 254904 - 9

👇
Ответ:
sofiyabutina667
sofiyabutina667
26.11.2020
1.

var x,s:integer;
begin
read(x);
s := 0;
while x > 0 do
  begin
  if x mod 10 < 6 then s := s + 1; {здесь была ошибка}
  x := x div 10
  end;
write(s)
end.

2.

var x,s:integer;
begin
read(x);
s := x mod 10;
while x > 10 do
  x := x div 10;
write(x + s)
end.

3.

var x,a,b:integer;
begin
read(x);
a := x mod 10;
b := x mod 10;
while x > 0 do
    begin
    if x mod 10 > a then a := x mod 10;
    if x mod 10 < b then b := x mod 10;
    x := x div 10;
    end;
write(a + b)
end.
4,4(91 оценок)
Ответ:
DarKerThanBlaCK34
DarKerThanBlaCK34
26.11.2020
// PascalABC.NET 3.0, сборка 1144 от 16.01.2016
begin
  var s:=ReadInteger('n=').ToString;
  Writeln('Количество цифр, меньших 6, равно ',
    s.Where(x->x<'6').Count);
  Writeln('Сумма первой и последней цифры равна ',
    StrToInt(s[1])+StrToInt(s[s.Length]));
  Writeln('Сумма самой маленькой и самой большой цифры равна ',
    StrToInt(s.Min)+StrToInt(s.Max));
end.

Тестовое решение:
n= 254904
Количество цифр, меньших 6, равно 5
Сумма первой и последней цифры равна 6
Сумма самой маленькой и самой большой цифры равна 9
4,6(52 оценок)
Открыть все ответы
Ответ:
UlyanaAleks
UlyanaAleks
26.11.2020

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

оформить курсовую или дипломную работу;

составить резюме кандидата на должность;

напечатать заявление о приеме на работу;

подготовить многомиллионный договор на поставку товара;

сочинить и отредактировать для печати целый роман.

Другими словами, текстовый редактор Microsoft Word, будет полезен абсолютно любому пользователю компьютера, который так или иначе связан с текстовыми документами.

4,7(91 оценок)
Ответ:
dianakokorina91
dianakokorina91
26.11.2020
41)Создать новую таблицу
42) Д)
43)Правка - Удалить запись.
50) Параметры.
53)Выводится диалоговое окно с приглашением ввести параметр для условия на отбор записей.
56)Изменяются значения в полях определенных записей.
57)Создается таблица с данными, соответствующими определенным условиям.
62)Автоматической вставки последовательных или случайных чисел в качестве номера новой записи.
65)Во вкладке Режим таблиц – выбрать Вставить 
66)Разные имена, но одинаковый тип данных.
69)Для отбора записей, данные в которых соответствуют определенным условиям.
70)Е)
71)Для создания контрольного переключателя.
4,6(93 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ