Yelena1409
?>

For a=10 to 1 step -3 s=s+a print a; next a print s end решите .желательно полный ответ.

Информатика

Ответы

sergeev-alp5
A=10   s=0+10=10   вывод 10 a  =7     s=10+7=17     вывод 7 a  =4   s=17+4 =21  вывод 4 a=  1   s=21+1 =22   вывод 1 a=-2                       вывод 22
morozova4956

Для добавления таблицы на веб-страницу используется тег <table>. Этот элемент служит контейнером для элементов, определяющих содержимое таблицы. Любая таблица состоит из строк и ячеек, которые задаются соответственно с тегов <tr> и <td>. Таблица должна содержать хотя бы одну ячейку (пример 1). Допускается вместо тега <td> использовать тег <th>. Текст в ячейке, оформленной с тега <th>, отображается браузером шрифтом жирного начертания и выравнивается по центру ячейки. В остальном, разницы между ячейками, созданными через теги <td> и <th> нет.


Hапиши код для создания таблицы. С учетом шрифтов, цветового оформления, концентрации текста.
info126
Var b,c: boolean; a: integer; begin readln(a); writeln(not odd(a)); if a mod 10 = 7 then b: =true; writeln(b); writeln(not odd(a mod 10)); end.var r,a: integer; beginread(r,a); if a*a> pi*r*r then writeln('square')else if a*a< pi*r*r then writeln('circle')else writeln('equal'); end.var m1,m2,v1,v2: integer; beginread(m1,v1,m2,v2); if m1/v1> m2/v2 then writeln('p1> p2')else if m1/m2< m2/v2 then writeln('p1< p2')else writeln('p1=p2'); end.var a,b: real; beginread(a,b); b*=0.45; if a> b then writeln(b)else if a< b then writeln(a)else writeln('equal'); end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

For a=10 to 1 step -3 s=s+a print a; next a print s end решите .желательно полный ответ.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

dovgash2
Pochkun-Oleg
tatianaavoronina66
MikhailSvetlana
АркадьевичБундин789
ogonizoloto
Вадим-Рашад323
sarycheva659
Анна-Денис1346
lzelenyi5
treneva359
ekaizer
lyukiss
Кириллов57
zabava-83