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 a: array[1..50] of integer; i,f, n: integer;
begin write('n='); readln(n); for i : = 1 to n do begin write('a', i, '='); readln(a[i]); end; f : = 0; writeln; for i : = 1 to n - 1 do if (a[i] mod 2 < > 0) and (a[i + 1] mod 2 = 0) then f : = 1; if f = 0 then begin for i : = 1 to n do if a[i] < 0 then write(a[i]: 4); end else for i : = 1 to n do if a[i] > 0 then write(a[i]: 4); end.
Популярные вопросы