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

Вводиться n чисел. сколько из них заканчивается на 3? pascalabc

👇
Ответ:
1705081705
1705081705
15.01.2021
// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln(ReadSeqInteger(ReadInteger).Where(t->Abs(t) mod 10=3).Count)
end.

Пример
8
-13 23 6 3 130 0 123 2
4
4,8(92 оценок)
Открыть все ответы
Ответ:
lisafoxxxxxxxx
lisafoxxxxxxxx
15.01.2021
// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
const
  КолСтрок=3;
  КолСтолбцов=5;
begin
  var Массив: array [1..КолСтрок,1..КолСтолбцов] of integer;
  var СуммыПоСтрокам: array[1..КолСтолбцов] of integer;
  Writeln('Введите элементы массива (',КолСтрок,',',
    КолСтолбцов,') построчно:');
  for var строка:=1 to КолСтрок do
    for var столбец:=1 to КолСтолбцов do begin
      Read(Массив[строка,столбец]);
      СуммыПоСтрокам[строка]+=Массив[строка,столбец]
      end;
  Writeln('Суммы построчно:');
  for var строка:=1 to КолСтрок do Print(СуммыПоСтрокам[строка])
end.

Тестовое решение
Введите элементы массива (3,5) построчно:
7 -5 13 19 -11
8 23 -15 -6 0
12 -6 -9 0 12
Суммы построчно:
23 10 9
4,6(95 оценок)
Ответ:
vi600081
vi600081
15.01.2021

1. нет ответа

4. а) сжать изображения

    б) удалить встроенные шрифты

5 фотографий

Объяснение:

1. таблицы наверное забыли загрузить...

4. а) с любого графического редактора изменить параметры изображений

   б) удалить встроенные шрифты

   в) можно еще упаковать документ с архиватора, но самый лучший выход почистить наконец флешку от ненужного хлама. Но это для ответа не годится, т. к. не соблюдаются условия задачи.

5.

1 Гб = 1 * 1024 * 1024 = 1048576 Кб - память фотоаппарата

1048576 Кб / 30720 Кб = 34,133333333333333333333333333333 - всего фотографий

34 - 29 = 5 - осталось

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