Задать вопрос!

Задать вопрос!

Все категории

Глеб Кровенко

4 года назад

5

Помогите пожалуйста составить схему-алгоритм для вычисления суммы только положительных чисел из последовательно вводимых(нужно о

становить обработку при достижении суммы 100.0)

Информатика

1 ответ:

АЛИНА66994 года назад

0 0

Блок-схема алгоритма - в прилагаемом файле.

Читайте также

Uses crt; var n,s,s1,s2,k:integer; begin writeln('Введите число: '); readln(n); s:=0; s1:=0; s2:=0; while n>0 do begin inc(k)

Александр Алексан...

Uses crt;
var
n,p:integer;
begin
writeln('Введите число: ');
readln(n);
p:=1;
while n>=10 do begin
p:=p*(n mod 100 div 10);
n:=n div 100;
end;
writeln('p = ',p);
end.

Пример:
Введите число:
236584
p = 96

0 0

4 года назад

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

romansemen

Uses Crt; // подключение модуля Crt
Var
a,b,c,S:real; // объявление переменных вещественного типа
Begin
ClrScr; // очистка консоли перед новым вводом переменных
Write('Введите три числа: '); // вывод приглашения к вводу
ReadLn(a,b,c); // считывание введённых с клавиатуры чисел в переменные a,b и c
S:=a+b+c; // запись суммы чисел в переменную S
if S > 10 then Write('Их среднее арифметическое: ',S/3)
else if S = 10 then Write('Их произведение: ',a*b*c)
else Write('Я ничего не понимаю');
ReadLn // ожидание нажатия пробела (чтобы консоль не закрылась сразу)
End.

Пример работы программы:

Введите три числа: 1 7 10
Их среднее арифметическое: 6

0 0

1 год назад

Прочитать ещё 2 ответа

Информационный объем слова ДИСКОВОД в системе кодирования Unicode составляет БИТ?

Vikki-mikki

В Юникоде 1 символ - 16 бит. 16 * 8 = 128 бит.

0 0

4 года назад

Прочитать ещё 2 ответа

Перевести числа 3547, 2690, 1457, 2697, 3761, 4789, 7653, 8546 в римскую систему счисления. очень срочно!!!

Alljebetta [295]

MMMDXLVII
MMDCXC
MCDLVII
MMDCXCVII
MMMDCCLXI
MMMMDCCLXXXIX
MMMMMMMDCLIII
MMMMMMMMDXLVI

0 0

4 года назад

Почтальону необходимо последовательно поместить 6 населенных пунктов . На схеме они обозначены латинскими буквами, числа указыва

ser991

А схема где ??
без схемы не решить

0 0

4 года назад