Опишите на изучаемом языке программирования следующую информацию" если значение переменной s больше значения переменной d, то максимуму присвоить значение переменной s

👇

Увидеть ответ

Ответ:

Astronavtka

28.05.2023

Pascal --- if ( s > d) then var_max := s;

Basic --- if s > d then var_max = s

Python --- if s > d: var_max = s

4,8(49 оценок)

Открыть все ответы

Ответ:

Maria3111

28.05.2023

Var
    money: array[1..7]of integer;
    count: array[1..7]of integer;
    s, i: integer;

begin
    money[1] := 1;
    money[2] := 2;
    money[3] := 5;
    money[4] := 10;
    money[5] := 50;
    money[6] := 100;
    money[7] := 500;

    write('s = ');
    readln(s);

    i := 7;
    repeat
        if s >= money[i] then begin
            s := s - money[i];
            count[i] := count[i] + 1;
        end
        else i := i - 1;
    until s <= 0;

    for i := 7 downto 1 do
        if count[i] > 0 then
            writeln(money[i], ' p. = ', count[i], ' шт.')
end.

4,5(88 оценок)

Ответ:

nadezdaakopan

28.05.2023

Начнем сначала. Паскаль является строго типизированным языком, значит чтобы использовать переменную, надо её сначала добавить в специальный блок var.

Константы добавляются отдельно.

Рассмотрим сперва неольшой пример, не имеющий отношение к твоей задаче:

program task1;

var i:integer;

begin

write("Vvedite i: ");

readln(i);

writeln(i);

end.

Программа просто попросит ввести i, запомнит введенное значение в ячейку с именем i.

Так вот чтобы разрешить использовать ячейку с именем i, мы и должны добавить её var i:integer; (ячейка i в которую можно класть целые числа, integer - целое по английски)

Теперь по твоему заданию:

1. в Паскале нет "переменных" чисел,

вот типы, которые есть в Паскале:

для целых чисел:
integer, диапазон -32768..32767
byte, диапазон 0..255
word, диапазон 0..65535
shortint, диапазон -128..127
longint, диапазон -2147483648..2147483647

для вещественных типов (в такие ячейки можно класть как целые числа, так и числа с точкой)

single (мало значащих цифр)

real (средне значащих цифр)
double (много значащих цифр)
extended (очень много значащих цифр)

логический тип
boolean может быть либо true либо false

Символьный тип
char просто любой символ, из поддерживаемых Паскалем (ASCII кодировка)

Таким образом фраза

"Составить программу описания двух переменных чисел" понята мной как:

"Составить программу описания переменных:"

Итак, теперь программа:

program zadacha1;
var
d1,d2,d3:real; {dejstvitelnie, 3 stuki}
i1,i2,i3:integer;{celie, 3 shtuki}
const e=2.71; {Pervaya postojannaya}
g=9.8; {Vtoraya postoyannaya}
gravity=6.61; {Tretjya postoyannaya}
var c1,c2:integer; {dve celie, chislovie}
key:char; {odna simvolnaya}
begin
{zdes' teper' mozhno pisat' programmu}
end.

P.S. во вложении этот же исходный код, а на изображении еще и пример как класть значения в эти переменные.

Задавайте дополнительные вопросы