i,s1,s2: integer; begin for i: =1 to 100 do begin if i mod 2=0 then s1: =s1+i else s2: =s2+i; end; writeln('сумма четных чисел: ',s1); write('сумма нечетных чисел: ',s2); end.
Ответ дал: Гость
в лодку помещается 2 человека? если так, то решение будет:
1. сперва перевправляются 2 , один возвращается назад на лодке.
2. переправляются 2 миссионера, а назад возвращается оставшийся на берегу .
3. переправляются 2 , один остается, второй плывет за оставшимся на другом берегу .
4. переплывают 2 оставшихся .
Ответ дал: Гость
на каком языке нужна программа? пример на paskal: program zadacha; var massiv: array [1..15] of integer; i: byte; massiv2: array [1..15] of real; begin randomize; write('isxodnij massiv: '); for i: =1 to 15 do begin massiv: =random(41)-20; write(massiv,' '); end; writeln; writeln('massiv posle preobrazovanij: '); for i: =1 to 15 do begin if massiv=0 then massiv2: =massiv else if massiv mod 5 = 0 then massiv2: =massiv*2 else begin massiv2: =massiv; massiv2: =massiv2/2; end; write(massiv2: 0: 1,' '); end; readln; end.
Ответ дал: Гость
стандартный программе просмотра изображений и факсов не сохраняет в других форматах.
потому лучше открыть paint или любой другой просмотрщик или графический редактор
просто открыть в нем нужную картинку и файл-сохранить как(в новом окошке внизу в списке выбрать формат)
о форматах написано много в интернете.
если хотите пошаговую инсрукцию, то присоединяйте картинки и табличку, а то так не ясно че делать
Популярные вопросы