Var n,i: int64; begin writeln('до какого числа'); read(n); for i: =1 to n do begin writeln('5*',i,'=',5*i); end; end.
Спасибо
Ответ дал: Гость
по введенному натуральному числу n(n< =100) обозначаешему количество ворон вывести надпись ,на дереве n ворон.где ворона склоняеться соответсвено n: 'ворон'.'ворона"вороны' в случаем n превышаюшего 100 вывести надпись 'ветка обламилась'
uses crt; var n : integer; begin clrscr; repeat write ( 'введите число от 1 до 100 n = ' ); readln (n ); until n> 0; case n of 11..14 : write ( 'сидело ' ,n , ' ворон' ); 1..10 ,15..100 : case n mod 10 of 1 : write ( 'на дереве сидела ' ,n , ' ворона' ); 2..4 : write ( 'на дереве сидели ' ,n , ' вороны' ); 0 ,5..9 : write ( 'на дереве сидело ' ,n , ' ворон' ); end else write ( 'ветка обломилась! ' ); end; readln; end.
Ответ дал: Гость
#include < cstdlib> #include < iostream> using namespace std; int main(int argc, char *argv[]){ int n; cout< < "введите количество элементов массива."< < endl; cin> > n; int mas1[n]; int mas2[n]; for(int i=0; i< n; i++){ mas1[i] = rand()%100; //заполняем массив случайными числами от 0 до 100 if(mas1[i]%10 == 4) { mas2[i]=mas1[i]/2; cout< < "замена! "; } else {cout< < "\t"; mas2[i]=mas1[i]; } cout< < mas1[i]< < '\t'< < mas2[i]< < endl; } system("pause"); return exit_success; }
Популярные вопросы