program z1; uses crt; var n: integer; i: integer; begin write(' введите n : '); readln(n); for i : = 1 to n do begin writeln(' число: ',i,' степень: ', i *i); end; end.
си
откомпилирован: (dev cpp)
#include < stdio.h> #include < stdlib.h> #include < conio.h> #include < math.h> int main(){ int n = 0; printf("\n vvedite n: "); scanf("%d", & n); printf("\n chislo | stepen"); for(int i = 1; i < n; i++) { printf("\n %5d |%5d ", i, i * i); } getch( ); return 0; }
Ответ дал: Гость
var c,a,b,i,j,l: integer; begin cls;
write('введите через пробел отрезок'); read(a,b); for i: =a to b+1 do begin j: =2; l: =round(sqrt(i)); while (i mod j < > 0) and (j < = l) do begin inc(j); end; if (j > l) then begin write(c,' '); c: =i; end; end; end.
Ответ дал: Гость
блок схема,в jpeg формате (картинка ) сделана в word 2007.у вас ошибка составление программы (var max,x,e: real; ) [хотя вы запрашиваете x,y]
картинка загружаться не хочет =),на сайт.
зеркало
Ответ дал: Гость
квадратная стена в каждый угол посадить по зайцу, это будет 4 зайца, а пятого посадить в получаем у каждой стены по2 зайца
Популярные вопросы