информатика - наука о способах получения, накопления, хранения, преобразования, передачи, защиты и использования информации.
информация - сведения о чем-либо, независимо от формы их представления.
информационные технологии - широкий класс дисциплин и областей деятельности, относящихся к технологиям создания, и обработки данных, в том числе с применением вычислительной техники
Ответ дал: Гость
program msd; uses crt; var a,l,proiz,b,i: longint; beginclrscr; readln(a); proiz: =1; while true do beginl: =a mod 10; a: = a div 10; if odd(l) = true thenproiz: =proiz*lelseb: =b+1; i: =i+1; if a = 0 then break; end; if b = i then writeln('0')elsewriteln(proiz); if (proiz> 99) and (proiz< 1000) then writeln('da')else writeln('net'); readkey; end.
Ответ дал: Гость
include < iostream>
using namespace std;
int main()
{int n;
cin > > n;
switch(n)
{case 1: cout< < "i"; break;
case 5: cout< < "v"; break;
case 10: cout< < "x"; break;
case 50: cout< < "l"; break;
case 100: cout< < "c"; break;
case 500: cout< < "d"; break;
case 1000: cout< < "m"; break;
}
return 0;
}
Ответ дал: Гость
microsoft visual basic 2010(более ранние тоже прокатят)
dim i as single private sub form1_load(byval sender as system.object, byval e as system.eventargs) handles mybase.load i = val(inputbox("введите число")) if i > = 0 then i = i - 50 else i = i + 100 end if msgbox(i) end sub
просто на basic
dim i as single
input(i)
if i > = 0 then i = i - 50 else i = i + 100 end if
Популярные вопросы