Регистрация
Beario
20.06.2020 16:21
Информатика
Есть ответ 👍

Определите значение переменной а после выполнения алгоритма: а: =6 b: =1 b: =a/2*b a: =2*a+3*b

289
321
Посмотреть ответы 2

Ответы на вопрос:

ilja2099
ilja2099
4,4(63 оценок)
Var a,b: real; begin  a: =6;   b: =1;   b: =a/2*b;   a: =2*a+3*b;   write(a); end.ответ: 21
violettasergeevna
violettasergeevna
4,5(32 оценок)

var a:String;

   i,sum:Integer;

begin

 writeln('Введите последовательность чисел:');

 readln(a);

 a := a.Replace(' ', '');

 writeln('Количество чисел:' + a.Length);

 for i := 1 to a.Length do

   sum := sum + strToInt(a[i]);

 writeln('Сумма: ' + sum);

end.

Объяснение:

В начале я за последовательность чисел как строку, убрал все пробелы и посчитал длину самой строки, этим я узнал, сколько там чисел. Далее используя циклом посчитал сумму всех чисел.

Ввод:

1 2 3 4 5

Вывод:

Количество чисел: 5

Сумма: 15

Популярно: Информатика