1. ближе всего 4 вариант, но там после integer стоит "," , а не "; " , так что если это не опечатка, то ответа здесь нету. 2. 13. их здесь увидела больше, чем 5. выбирайте любые. real. - вместо точки должно быть "; " begin; - "; " быть не должно writelen - writeln (введите 2 числа) - отсутствуют апострофы reedln - readln writen - writeln ('сумма s=' s: 5: 2) после апострофа и перед переменной должна быть запятая4. 15. 46.
Tarapovskaya
11.05.2020
Код для примитивной "рисовалки", рисуете что хотите. для сохранения на рабочий стол нажимаете клавишу "enter" // pascalabc.net // версия 3.3.5 сборка 1662 (29.04.2018) uses graphabc; begin window.title : = 'рисование мышью(enter - сохранить на раб. стол)'; pen.color : = color.red; pen.width : = 3; onmousedown : = (x,y,mb) -> moveto(x,y); onmousemove : = (x,y,mb) -> if mb=1 then lineto(x,y); var a: =system.security.principal.windowsidentity.getcurrent.name; onkeydown: =k-> if k=13 then begin savewindow('c: \users\'+copy(a,pos('\',a)+1,a.length-pos('\',a)+1)+'\desktop\image.png'); window.close; end; end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Сделать циклическую блок схему по информатике"жарить картошку"