Линейка- чтобы измерять
транспортир-тот кто перевозит машины
термометр-чтобы измерять температуру
барометр-прибор который измеряет давление
компасы чтобы находить мтороны
телескоп чтобы наблюдать за звездами
микроскоп-чтобы смотреть на мелкие вещи
То же самое, что и в предыдущих блоках было, выполнить 1 раз в отношении переменной D.
Алгоритм:
1) Максимальное =A
2) Если B>максимального, то максимальное=B
3) Если C>максимального, то максимальное=C
4) Если D>максимального, то максимальное=D
Var a,b,c,d:integer;begind:=0;a:=0;b:=0;c:=0;beginreadln(a);readln(b);readln(c);d:=a+b+c;if d > 3 thenbeginwriteln('A',a-1) ;writeln('B',b-1);writeln('C',c-1);end;elsea:=a*a;b:=b*b;c:=c*c;end;writeln('A',a) ;writeln('B',b);writeln('C',c);end. / в коде ошибка (
Var a:integer;
<span>begin </span>
<span>writeln('Введите сторону куба'); </span>
<span>readln(a); </span>
<span>writeln('Объем куба с ребром ',a,' равен — ',a*a*a); </span>
<span>writeln('Площадь поверхности куба равна — ', 6*a*a); </span>
<span>end. </span>