Ответ:
program pred;
var
n, i, s: Integer;
begin
Write ('Введите N: ');
ReadLn (n);
s := 0;
i := 1;
while i <= n do begin
if i mod 2 = 0 then
s := s + i;
Inc (i);
end;
WriteLn ('Сумма = ', s);
ReadLn;
end.
- - - - - - - - - - - - - -
program post;
var
n, i, s: Integer;
begin
Write ('Введите N: ');
ReadLn (n);
s := 0;
i := 1;
repeat
if i mod 2 = 0 then
s := s + i;
Inc (i);
until i > n;
WriteLn ('Сумма = ', s);
ReadLn;
end.
При рисовании пятиконечной звезды Черепаха совершает два оборота, т.е. 720 градусов.Делим 720 на пять поворотов и даём поправку в 40 градусов.x = 720/5 + 40 = 144 + 40 = 184.<span>Подходит также второй вариант угла: 360-144 = 216, который с поправкой на 40 градусов даёт замечательное число 256.</span>
В граф. вид сами нарисуете (я не кулинар, предупреждаю).
Начало (в кружке)
Цикл начинается:
Берем блин (в квадрате)
Кладем на сковородку (в квадрате)
Переварачиваем (в квадрате)
Кладем на тарелку для блинов (в квадрате)
Цикл кончается
Конец (в кружке)
К циклу прикрутите счетчик и после начала еще 'считывайте' количество блинов
Ответ:
Так как язык не указан, предлагаю решения на 2х языках - Python и C#
<em>Python:</em>
def main():
marks = list(map(int, input().split()))
assert len(marks) == 10
return sum(marks)/10
if __name__ == '__main__':
print(main())
<em>C#</em>
using System;
namespace Global
{
class App
{
int[] marks = new int[10];
double summ = 0;
static void Main(string[] argv)
{
App Obj = new App();
Obj.Run();
}
public void Run()
{
for(int i = 0; i < 10; i++)
{
marks[i] = Convert.ToInt32(Console.ReadLine());
}
for (int i = 0; i<10; i++)
{
summ = summ + marks[i];
}
Console.WriteLine(summ / 10);
Console.ReadKey();
}
}
}
Объяснение:
На случай проблем с копированием кода оставляю ссылки на исходный код на сервисе pastebin.com:
Python: https://pastebin.com/a74HdSQU
C#: https://pastebin.com/6JQA5GvX
Обе программы протестированы и полностью выполняют поставленную задачу
var a,b,c,d:integer;
begin
writeln('Вступительный балл');
readln(a);
writeln('1 экзамен ');
readln(b);
writeln('2 экзамен ');
readln(c);
writeln('3 экзамен ');
readln(d);
if a<(b+c+d) then
writeln('Ученик принят');
else
writeln('Ученик не принят');
end.