Var
count_num:integer;
number:real;
begin
count_num:=0;
repeat
readln(number);
writeln('Введенное число: ',number);
if (number <> 0) then Inc(count_num);
until (number =0);
writeln('Количество введеных чисел: ', count_num);
end.

0 0

4 года назад

Краткое сообщение на тему ПОЗИЦИИ ПАЛЬЦЕВ НА КЛАВИАТУРЕ

mamanikitki [82]

Пальцы должны не сильно давить на клавиатуру, иначе она сломается

0 0

4 года назад

Составьте программу вычисления суммы чисел кратных 29 в диапазоне от 29 до 1160. (Программа С++)

Ирина Март [24]

#include <iostream>
using namespace std;

int main()
{
int i; // счетчик цикла
int sum = 0; // сумма чисел
for (i = 29; i <= 1160; i+29) // задаем начальное значение, конечное и задаем шаг цикла 29.
{
sum = sum + i;
}
cout << "Сумма чисел = " << sum << endl;
return 0;
}

0 0

4 года назад

Выполнить сложение и вычитание чисел, во 2-ой системе исчесления. Вот сами числа- 121 и 66. и 666 и 228. Можно написать только о

goqo [64]

1) 121 = 1111001

66 = 1000010

= 1111011

2) 666 = 1010011010

228 = 11100100

= 1101111110

0 0

1 год назад