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

Определить количество трехзначных чисел ,кратных 3.(паскаль)

👇
Ответ:
kategorn1
kategorn1
08.05.2020

var

 i, c: integer;

 

begin

 c := 0;

 for i := 100 to 999 do

   if i mod 3 = 0 then inc(c);

 Writeln(c, ' трехзначных чисел кратных 3.');

end.

4,4(13 оценок)
Открыть все ответы
Ответ:
loloshka21
loloshka21
08.05.2020
1.
алг
нач цел X
ввод X
если X>0 то 
X:=X+1
все
вывод X 
кон

2.
алг
нач цел X
ввод X
если X>0 то
X:=X+1
иначе
X:=X-2
все
вывод X 
кон

3.
алг
нач цел X
ввод X
 если X>0 то
  X:=X+1
 все
 если X<0 то
  X:=X-2
 все
 если X=0 то
  X:=10
 все
вывод X
кон

4.
алг
нач цел X,Y,Z,N
ввод X,Y,Z
N:=0
если X>0 то
N:=N+1
все
если Y>0 то
N:=N+1
все
если Z>0 то
N:=N+1
все
вывод N
кон

5.
алг
нач цел X,Y,Z,N,K
ввод X,Y,Z
N:=0
K:=0
если X>0 то
N:=N+1
иначе
K:=K+1
все
если Y>0 то
N:=N+1
иначе
K:=K+1
все
если Z>0 то
N:=N+1
иначе
K:=K+1
все
вывод N,K
кон

Самые наиболее простые варианты выбрал думаю в самый раз
4,6(56 оценок)
Ответ:
ksuz
ksuz
08.05.2020

Відповідь:

Пояснення:

Додавання та видалення об’єктів таблиці (виділити необхідний об’єкт і вибрати потрібну команду в меню Таблиця чи контекстному меню об’єкта).

---Об’єднання та розбиття клітинок (виділити необхідні комірки та в меню Таблиця, контекстному меню чи на панелі інструментів «Таблиці і границі» → вибрати відповідно кнопки Кнопка "Об'єднати клітинки" – об’єднати чи Кнопка "Розбити клітинки" – розбити → за необхідності вказати потрібні параметри). При об’єднання клітинки зливаються в одну, а вміст – склеюється; при розбитті – в діалоговому вікні «Поділ клітинок» потрібно вказати необхідну кількість рядків і стовпців.

Розбивати і об’єднувати клітинки можна також, використовуючи інструменти «Створити таблицю» (щоб додати межу) та «Гумка» (щоб видалити зайві межі).

Змінення висоти рядків, ширини стовпців та розмірів клітинки. Ці операції можна виконати кількома :

Встановивши показник миші на потрібну межу таким чином, щоб він набув вигляду двонапрямленої стрілки Двонапрямлена стрілка , перетягнути його в потрібному напрямі;

За до маркерів на лінійці;

Меню Таблиця (контекстне меню) → Властивості → на відповідних вкладках вказати розміри;

Якщо необхідно зробити рядки чи стовпці одного розміру, то потрібно їх виділити → в меню Таблиця (контекстне меню, панель інструментів) потрібно вибрати Автодобір → вирівняти висоту рядків Кнопка "Вирівняти висоту рядків" чи вирівняти ширину стовпців Кнопка "Вирівняти ширину стовпців".

Перетворення таблиці на текст (Меню Таблиця → Перетворити)

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