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

Спо информатике. в программе pascal abc

👇
Ответ:
onaleman
onaleman
05.01.2020

1)

program p1; var x:integer; begin writeln('Введите трёхзначное число'); readln(x); writeln('Самая левая цифра числа: ', x div 100); end.

2)

program p2; var x,y:integer; begin writeln('Введите двухзначное число'); readln(x); y:=x div 10+x mod 10; writeln('Сумма цифр числа: ', y); end.
4,6(62 оценок)
Открыть все ответы
Ответ:
ktuj240
ktuj240
05.01.2020
Честно, не поняла ваш код вообще. Почему нет цикла? Предлагаю свое решение:
1)Cначала заполняем массив случайными числами от 2 до 5 (включительно)
2)Потом выводим его (Для проверки)
3) Потом считаем оценки. Но сначала нужно обнулить переменные( В самом начале это делали), а то получится кака (:

program N_0547847;
var
    b, c, d, f, i:integer;
    a: array [1..20] of integer;
begin;
randomize;
b:=0; c:=0; d:=0; f:=0;
for i:=1 to 20 do begin
  a[i]:=random(4)+2; 
  write(a[i],' '); end; 
writeln;
for i:=1 to 20 do begin
    if a[i]=2 then  b:=b+1;
    if a[i]=3 then  c:=c+1;
    if a[i]=4 then  d:=d+1;
    if a[i]=5 then   f:=f+1;
end;
writeln('Двоек: ', b); 
writeln('Троек: ', c); 
writeln('Четверок: ',d);
writeln('Пятерок: ',f);
end.   
4,5(26 оценок)
Ответ:
sofia3451
sofia3451
05.01.2020

Объяснение:

Ну букву 'T' замените на int, к примеру:

C++Выделить код

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

void bubbleSort(int* arr, int size)  // Сортировка пузырьком

{

   int tmp;

 

   for(int i = 0; i < size - 1; ++i) // i - номер прохода

   {            

       for(int j = 0; j < size - 1; ++j) // внутренний цикл прохода

       {      

           if (arr[j + 1] < arr[j])  

           {

               tmp = arr[j + 1];  

               arr[j + 1] = arr[j];  

               arr[j] = tmp;

           }

       }

   }

}

Передавать массив вот так:

bubbleSort(имя_массива, количество_элементов);

0

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