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

Программа с оператором вывода (если установлена программа PascalABC.NET, напечатать программу и нажать на кнопку Выполнить (зеленый треугольник), если не установлена, переписать в тетрадь)

program test;
var a: integer;
begin
a:=78;
write (‘a=’, a);
end.

Оператор ввода данных записывается служебным словом read, после которого в скобках следует список переменных, значения которых пользователь может ввести.

Программа с вводом и выводом данных (Если установлена программа PascalABC.NET, напечатать программу и нажать на кнопку Выполнить (зеленый треугольник), если не установлена, переписать в тетрадь)

program pryamougolnik; //заголовок программы
var a, b, s, p: real; //раздел описания переменных
begin // начало программы
writeln ('Программа расчёта площади и периметра прямоугольника по длине его сторон.');
write ('a=');
readln (a);
write ('b=');
readln (b);
s:=a*b;
p:=(a+b)*2;
write ('s=', s:5:2, ' p=', p:5:2);
end.
1. Сколько переменных в программе pryamougolnik?

2. Какого типа переменные в программе pryamougolnik?

3. Что происходит в строчке программы

write ('a=');

4. Что происходит в строчке программы

readln (b);

5. Что происходит в строчке программы

p:=(a+b)*2;

6. Чем отличаются операторы read и readln?

👇
Ответ:
tanyabober
tanyabober
11.02.2021

1) переменных: 4.

2) тип real (вещественные числа).

3) на экран выводится текст "а=".

4) программа считывает значение в переменную "b".

5) программа присваивает переменной "р" значение формулы "(а+b)*2".

6) оператор read считывает значение.

оператор readln считывает значение с новой строчки.

4,8(1 оценок)
Открыть все ответы
Ответ:
markay
markay
11.02.2021

(см. объяснение)

Объяснение:

program task;

var i: integer;

const N=5;

procedure writeOut(i: integer);

begin

 if(i<N) then write(', ')

 else writeln('.');

end;

begin

 if(N<1) then begin writeln('N>0 и целое!'); exit; end;

 writeln('ЦИКЛ FOR:');

 for i:= 1 to N

   do begin

        write(i); writeOut(i);

      end;

 writeln;

 writeln('ЦИКЛ WHILE:');

 i:= 1;

 while(i<N+1)

   do begin

        write(i); writeOut(i);

        i:= i+1;

      end;

 writeln;

 writeln('ЦИКЛ REPEAT:');

 i:= 1;

 repeat

   write(i); writeOut(i);

   i:= i+1;

 until i=N+1;

end.

4,4(72 оценок)
Ответ:
alan550
alan550
11.02.2021
получить 14 с наименьшей цифрой - 9 и 5, а 12 - 9 и 3. Ставим 3 впереди, имем 395.

Следующий код на Python это подтверждает:

def change_3dig():
    n = 100
    while n < 1000:
        digits = (n // 100,
                  n % 100 // 10,
              n % 10)
        sums = (digits[0] + digits[1],
                digits[1] + digits[2])
        res = str(max(sums)) + \
          str(min(sums))
        yield (n, int(res))
        n += 1

ans = [(n1, n2) for n1, n2 in change_3dig() if n2 == 1412]
print(min(ans))

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