Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
по формуле n= найдем, сколько было круглых фигурок - = 4; всего фигурок было 15+4=19. ответ: 19
var
n: integer;
begin
readln(n);
if (n mod 10)=(n div 100) then
writeln('палиндром')
else
writeln('не палиндром');
end.
алгоритм-это организованная последовательность действий.
свойства алгоритма: дискретность, , массовость, детерминированность, конечность.
алгоритм:
1)взять линейку
2)найти длинный всех сторон
3)сложить все три строны треугольника
4)записать ответ
(извиняюсь если алгоритм не правильно написан, с не дружу)
1)
var a,b,c,d: real;
read(a,b);
c: =(a+b)/2;
d: =2*a*b;
if a> b then begin
a: =d;
b: =c;
end;
if a< b then begin
a: =c;
b: =d;
writeln(a,' ',b);
2)
var a,b: integer;
if (a< 1) or (a> 31) then writeln(' день введен неправильно');
if (b< 1) or (b> 12) then writeln(' месяц введен неправильно');
3)
var a,b,c: real;
read(a,b,c);
if (a> b)and(a> c)then writeln(a);
if (b> a)and(b> c)then writeln(b);
if (c> b)and(c> a)then writeln(c);
Популярные вопросы