ВЫПОЛНИТЕ ЗАДАНИЕ ПО ИНФОРМАТИКЕ НУЖНО Составить алгоритм и предоставить блок-схему алгоритма для решения следующей задачи: Вычислить объем круглого конуса. Для вычислення следует воспользоваться формулой
1шаг алгоритма. а) записывается исходная цепочка символов, после нее записывается исходная цепочка символов в обратном порядке КОМ+МОК = КОММОК б) затем записывается буква, следующая в русском алфавите за той буквой, которая в исходной цепочке стояла на последнем месте (за буквой М в русском алфавите следует буква Н) КОММОК+Н = КОММОКН 2 шаг алгоритма. а) записывается исходная цепочка символов, после нее записывается исходная цепочка символов в обратном порядке КОММОКН+НКОММОК = КОММОКННКОММОК б) затем записывается буква, следующая в русском алфавите за той буквой, которая в исходной цепочке стояла на последнем месте (за буквой Н в русском алфавите следует буква О) КОММОКННКОММОК+О = КОММОКННКОММОКО ответ: количество букв О в полученной последовательности = 5
1 program z; var i : integer; begin Writeln('Введите число'); Readln(i); if i mod 2 = 0 then Writeln('Число чётное') else Writeln('Число не чётное'); readln; end.
2 program z; var i : integer; begin Writeln('Введите число'); Readln(i); if i mod 3 = 0 then Writeln('Число делится на 3') else Writeln('Число не делится на 3'); readln; end.
3 program z; var i: array[1..6] of byte; x:byte; begin for x:=1 to 6 do
begin Writeln('Введите ', x,' цифру из 6 '); Read(i[x]); end; if (i[1]+i[2]) = (i[4]+i[5]+i[6]) then Writeln('Билет счастливый') else Writeln('Билет не счастливый'); Readln; end.
5))) program z; var i : integer; begin Writeln('Введите число'); Readln(i); if i mod 6 = 0 then Writeln('Число делится на 6') else Writeln('Число не делится на 6'); readln; end. 6 program z; var a,b:integer; begin Writeln('Введите число A'); Readln(a); Writeln('Введите число B'); Readln(b); if b mod a = 0 then Writeln('Число А делится нацело на число В') else Writeln('Число А не делится нацело на число B'); Readln; end.
а) записывается исходная цепочка символов, после нее записывается исходная цепочка символов в обратном порядке
КОМ+МОК = КОММОК
б) затем записывается буква, следующая в русском алфавите за той буквой, которая в исходной цепочке стояла на последнем месте
(за буквой М в русском алфавите следует буква Н)
КОММОК+Н = КОММОКН
2 шаг алгоритма.
а) записывается исходная цепочка символов, после нее записывается исходная цепочка символов в обратном порядке
КОММОКН+НКОММОК = КОММОКННКОММОК
б) затем записывается буква, следующая в русском алфавите за той буквой, которая в исходной цепочке стояла на последнем месте
(за буквой Н в русском алфавите следует буква О)
КОММОКННКОММОК+О = КОММОКННКОММОКО
ответ: количество букв О в полученной последовательности = 5