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

Составьте блок-схему и напишите программу, которая в последовательности целых чисел определяет сумму чётных или оканчивающихся на 2 чисел. программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0, не входит в последовательность). количество введённых чисел не превышает 1000. паскаль . мне ннужно. последние быллы отдал

Показать ответ
Ответ:
RinaZum
RinaZum
24.10.2021 14:02

{#1 Деление на числа меньше 7}

begin

var F: boolean;

var a: integer; read(a);

 for var x := 7 downto 1 do

 begin

   F := (a mod x = 0) ? true : false;

   if F <> true then break;

 end;

end.

{#2 Находится ли точка внутри окружности}

begin

 var F: boolean;

 var z: cardinal;

 var x,y: double; read(x,y,z);

  x := (x<1)? x*-1:x;

  y := (y<1)? y*-1:y;

  if (x<z) and (y<z) then  

 F := true;

end.

{#3 В трехзначном числе есть три одинаковые цифры}

begin

 var F: boolean;

 var n: integer; read(n);

 var s := n.ToString;

 if (s[1] = s[2])  

    or (s[2] = s[3])  

     or (s[1] = s[3]) then

 F := true;

end.

{#4 Точки лежат на одной прямой}

begin

 var F: boolean;

 var x1,y1,x2,y2,x3,y3: integer;

 read (x1,y1,x2,y2,x3,y3);

 if (x2 - x1)*(y3 - y1) - (x3 - x1)*(y2 - y1) = 0 then

 F := true;

end.

{#5 Х или трёхзначное чётное число или четырёхзначное нечётное}

begin

var F: boolean;

var x:integer; read(x);

var s:=x.ToString;

if ((length(s) = 3) and (x mod 2 = 0)) or ((length(s) = 4) and (x mod 2 <> 0)) then

F := true;

end.

0,0(0 оценок)
Ответ:
BirdNumber1
BirdNumber1
19.04.2020 23:51

1. Заповніть словничок.

Проекти для виконавців складаються у середовищі Скретч. Виконавці, образи, сцена – це  програмні об'єкти середовища  Скретч. У Скретч виконавців називають спрайтами. Усі  спрайти мають властивості: імя, положення на сцені, розміри,  колір костюма та інш. Кожна із цих властивостей має своє  значення. Переглянути значення властивостей цього об’єкта  можна в розділі інформація. Сцена має такі властивості:  480 на 360 кроків виконавця і тло Тло можна змінювати використавши кнопики на панелі інструментів.

2. Запишіть вставлення об’єкта.

Створити новий об'єкт можна кількома

- обрати готовий об’єкт із бібліотеки спрайтів;

- намалювати в графічному об’єкті;

- вставити з файла;

- сфотографувати камерою підключеною до комп’ютера.

Над об'єктами можна виконувати різні дії: дублювати, вилучати, зберегти, сховати. Під час виконання програмного проекту зі спрайтами можуть бути пов’язані події, опрацювання яких призведе до змінення значень властивостей об’єктів.  

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота