Установите соответствие между значением переменной и ее типом: 1)х: =sqrt(16) а)booleam 2)y: ='x' б)integer 3)z: =х> 0 с)real 4)q: =-9 д)char
244
330
Ответы на вопрос:
Буквы у тебя в странном порядке: а б с д, похоже русификация abcd 1)с 2)д 3)а 4)б
uses
sysutils;
var
num: string;
sum, mult, i: integer;
begin
sum : = 0;
mult : = 1;
readln(num);
for i : = 1 to length(num) do
begin
sum : = sum + strtoint(num[i]);
mult : = mult * strtoint(num[i]);
end;
writeln('сумма - ', sum);
writeln('произведение - ', mult)
end.
Популярно: Информатика
-
lizаveta199805.02.2020 18:01
-
1Айжан1109.04.2021 23:04
-
redridinghood127.11.2021 00:17
-
mmb114.11.2020 19:02
-
доброx523.04.2020 07:42
-
vanyadrachuk200410.05.2023 06:21
-
exii15.01.2021 20:45
-
ЗагрединоваЖанель0921.12.2020 14:59
-
ВИКУСИК445505.04.2023 19:26
-
pawlomogischoxigx127.12.2022 12:13